Mercurial > vim
annotate src/testdir/test_debugger.vim @ 22987:1456b8e4d489 v8.2.2040
patch 8.2.2040: terminal buffer disappears even when 'bufhidden' is "hide"
Commit: https://github.com/vim/vim/commit/c9f8b849b6de9661e543d0d1431e233725dd956f
Author: Bram Moolenaar <Bram@vim.org>
Date: Tue Nov 24 19:36:16 2020 +0100
patch 8.2.2040: terminal buffer disappears even when 'bufhidden' is "hide"
Problem: Terminal buffer disappears even when 'bufhidden' is "hide".
(Sergey Vlasov)
Solution: Check 'bufhiddden' when a terminal buffer becomes hidden.
(closes #7358)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Tue, 24 Nov 2020 19:45:03 +0100 |
parents | dcb59b1cc0c1 |
children | b545334ae654 |
rev | line source |
---|---|
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
1 " Tests for the Vim script debug commands |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
2 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
3 source shared.vim |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
4 source screendump.vim |
17657
0da9bc55c31a
patch 8.1.1826: tests use hand coded feature and option checks
Bram Moolenaar <Bram@vim.org>
parents:
17172
diff
changeset
|
5 source check.vim |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
6 |
21687
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
7 CheckRunVimInTerminal |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
8 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
9 func CheckCWD() |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
10 " Check that the longer lines don't wrap due to the length of the script name |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
11 " in cwd |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
12 let script_len = len( getcwd() .. '/Xtest1.vim' ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
13 let longest_line = len( 'Breakpoint in "" line 1' ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
14 if script_len > ( 75 - longest_line ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
15 throw 'Skipped: Your CWD has too many characters' |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
16 endif |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
17 endfunc |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
18 command! -nargs=0 -bar CheckCWD call CheckCWD() |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
19 |
22969
dcb59b1cc0c1
patch 8.2.2031: some tests fail when run under valgrind
Bram Moolenaar <Bram@vim.org>
parents:
22486
diff
changeset
|
20 " "options" argument can contain: |
dcb59b1cc0c1
patch 8.2.2031: some tests fail when run under valgrind
Bram Moolenaar <Bram@vim.org>
parents:
22486
diff
changeset
|
21 " 'msec' - time to wait for a match |
dcb59b1cc0c1
patch 8.2.2031: some tests fail when run under valgrind
Bram Moolenaar <Bram@vim.org>
parents:
22486
diff
changeset
|
22 " 'match' - "pattern" to use "lines" as pattern instead of text |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
23 func CheckDbgOutput(buf, lines, options = {}) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
24 " Verify the expected output |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
25 let lnum = 20 - len(a:lines) |
22969
dcb59b1cc0c1
patch 8.2.2031: some tests fail when run under valgrind
Bram Moolenaar <Bram@vim.org>
parents:
22486
diff
changeset
|
26 let msec = get(a:options, 'msec', 1000) |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
27 for l in a:lines |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
28 if get(a:options, 'match', 'equal') ==# 'pattern' |
22969
dcb59b1cc0c1
patch 8.2.2031: some tests fail when run under valgrind
Bram Moolenaar <Bram@vim.org>
parents:
22486
diff
changeset
|
29 call WaitForAssert({-> assert_match(l, term_getline(a:buf, lnum))}, msec) |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
30 else |
22969
dcb59b1cc0c1
patch 8.2.2031: some tests fail when run under valgrind
Bram Moolenaar <Bram@vim.org>
parents:
22486
diff
changeset
|
31 call WaitForAssert({-> assert_equal(l, term_getline(a:buf, lnum))}, msec) |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
32 endif |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
33 let lnum += 1 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
34 endfor |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
35 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
36 |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
37 " Run a Vim debugger command |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
38 " If the expected output argument is supplied, then check for it. |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
39 func RunDbgCmd(buf, cmd, ...) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
40 call term_sendkeys(a:buf, a:cmd . "\r") |
19954
c087099e9163
patch 8.2.0533: tests using term_wait() can still be flaky
Bram Moolenaar <Bram@vim.org>
parents:
19651
diff
changeset
|
41 call TermWait(a:buf) |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
42 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
43 if a:0 != 0 |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
44 let options = #{match: 'equal'} |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
45 if a:0 > 1 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
46 call extend(options, a:2) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
47 endif |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
48 call CheckDbgOutput(a:buf, a:1, options) |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
49 endif |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
50 endfunc |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
51 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
52 " Debugger tests |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
53 func Test_Debugger() |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
54 " Create a Vim script with some functions |
17172
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
55 let lines =<< trim END |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
56 func Foo() |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
57 let var1 = 1 |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
58 let var2 = Bar(var1) + 9 |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
59 return var2 |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
60 endfunc |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
61 func Bar(var) |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
62 let var1 = 2 + a:var |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
63 let var2 = Bazz(var1) + 4 |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
64 return var2 |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
65 endfunc |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
66 func Bazz(var) |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
67 try |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
68 let var1 = 3 + a:var |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
69 let var3 = "another var" |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
70 let var3 = "value2" |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
71 catch |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
72 let var4 = "exception" |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
73 endtry |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
74 return var1 |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
75 endfunc |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
76 END |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
77 call writefile(lines, 'Xtest.vim') |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
78 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
79 " Start Vim in a terminal |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
80 let buf = RunVimInTerminal('-S Xtest.vim', {}) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
81 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
82 " Start the Vim debugger |
16920
8d91579414b8
patch 8.1.1461: tests do not run or are not reliable on some systems
Bram Moolenaar <Bram@vim.org>
parents:
16372
diff
changeset
|
83 call RunDbgCmd(buf, ':debug echo Foo()', ['cmd: echo Foo()']) |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
84 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
85 " Create a few stack frames by stepping through functions |
16920
8d91579414b8
patch 8.1.1461: tests do not run or are not reliable on some systems
Bram Moolenaar <Bram@vim.org>
parents:
16372
diff
changeset
|
86 call RunDbgCmd(buf, 'step', ['line 1: let var1 = 1']) |
8d91579414b8
patch 8.1.1461: tests do not run or are not reliable on some systems
Bram Moolenaar <Bram@vim.org>
parents:
16372
diff
changeset
|
87 call RunDbgCmd(buf, 'step', ['line 2: let var2 = Bar(var1) + 9']) |
8d91579414b8
patch 8.1.1461: tests do not run or are not reliable on some systems
Bram Moolenaar <Bram@vim.org>
parents:
16372
diff
changeset
|
88 call RunDbgCmd(buf, 'step', ['line 1: let var1 = 2 + a:var']) |
8d91579414b8
patch 8.1.1461: tests do not run or are not reliable on some systems
Bram Moolenaar <Bram@vim.org>
parents:
16372
diff
changeset
|
89 call RunDbgCmd(buf, 'step', ['line 2: let var2 = Bazz(var1) + 4']) |
8d91579414b8
patch 8.1.1461: tests do not run or are not reliable on some systems
Bram Moolenaar <Bram@vim.org>
parents:
16372
diff
changeset
|
90 call RunDbgCmd(buf, 'step', ['line 1: try']) |
8d91579414b8
patch 8.1.1461: tests do not run or are not reliable on some systems
Bram Moolenaar <Bram@vim.org>
parents:
16372
diff
changeset
|
91 call RunDbgCmd(buf, 'step', ['line 2: let var1 = 3 + a:var']) |
8d91579414b8
patch 8.1.1461: tests do not run or are not reliable on some systems
Bram Moolenaar <Bram@vim.org>
parents:
16372
diff
changeset
|
92 call RunDbgCmd(buf, 'step', ['line 3: let var3 = "another var"']) |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
93 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
94 " check backtrace |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
95 call RunDbgCmd(buf, 'backtrace', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
96 \ ' 2 function Foo[2]', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
97 \ ' 1 Bar[2]', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
98 \ '->0 Bazz', |
16372
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
99 \ 'line 3: let var3 = "another var"']) |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
100 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
101 " Check variables in different stack frames |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
102 call RunDbgCmd(buf, 'echo var1', ['6']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
103 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
104 call RunDbgCmd(buf, 'up') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
105 call RunDbgCmd(buf, 'back', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
106 \ ' 2 function Foo[2]', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
107 \ '->1 Bar[2]', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
108 \ ' 0 Bazz', |
16372
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
109 \ 'line 3: let var3 = "another var"']) |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
110 call RunDbgCmd(buf, 'echo var1', ['3']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
111 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
112 call RunDbgCmd(buf, 'u') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
113 call RunDbgCmd(buf, 'bt', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
114 \ '->2 function Foo[2]', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
115 \ ' 1 Bar[2]', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
116 \ ' 0 Bazz', |
16372
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
117 \ 'line 3: let var3 = "another var"']) |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
118 call RunDbgCmd(buf, 'echo var1', ['1']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
119 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
120 " Undefined variables |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
121 call RunDbgCmd(buf, 'step') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
122 call RunDbgCmd(buf, 'frame 2') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
123 call RunDbgCmd(buf, 'echo var3', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
124 \ 'Error detected while processing function Foo[2]..Bar[2]..Bazz:', |
16372
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
125 \ 'line 4:', |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
126 \ 'E121: Undefined variable: var3']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
127 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
128 " var3 is defined in this level with some other value |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
129 call RunDbgCmd(buf, 'fr 0') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
130 call RunDbgCmd(buf, 'echo var3', ['another var']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
131 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
132 call RunDbgCmd(buf, 'step') |
16372
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
133 call RunDbgCmd(buf, '') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
134 call RunDbgCmd(buf, '') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
135 call RunDbgCmd(buf, '') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
136 call RunDbgCmd(buf, '') |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
137 call RunDbgCmd(buf, 'step', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
138 \ 'function Foo[2]..Bar', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
139 \ 'line 3: End of function']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
140 call RunDbgCmd(buf, 'up') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
141 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
142 " Undefined var2 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
143 call RunDbgCmd(buf, 'echo var2', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
144 \ 'Error detected while processing function Foo[2]..Bar:', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
145 \ 'line 3:', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
146 \ 'E121: Undefined variable: var2']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
147 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
148 " Var2 is defined with 10 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
149 call RunDbgCmd(buf, 'down') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
150 call RunDbgCmd(buf, 'echo var2', ['10']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
151 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
152 " Backtrace movements |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
153 call RunDbgCmd(buf, 'b', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
154 \ ' 1 function Foo[2]', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
155 \ '->0 Bar', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
156 \ 'line 3: End of function']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
157 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
158 " next command cannot go down, we are on bottom |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
159 call RunDbgCmd(buf, 'down', ['frame is zero']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
160 call RunDbgCmd(buf, 'up') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
161 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
162 " next command cannot go up, we are on top |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
163 call RunDbgCmd(buf, 'up', ['frame at highest level: 1']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
164 call RunDbgCmd(buf, 'where', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
165 \ '->1 function Foo[2]', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
166 \ ' 0 Bar', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
167 \ 'line 3: End of function']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
168 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
169 " fil is not frame or finish, it is file |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
170 call RunDbgCmd(buf, 'fil', ['"[No Name]" --No lines in buffer--']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
171 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
172 " relative backtrace movement |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
173 call RunDbgCmd(buf, 'fr -1') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
174 call RunDbgCmd(buf, 'frame', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
175 \ ' 1 function Foo[2]', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
176 \ '->0 Bar', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
177 \ 'line 3: End of function']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
178 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
179 call RunDbgCmd(buf, 'fr +1') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
180 call RunDbgCmd(buf, 'fram', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
181 \ '->1 function Foo[2]', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
182 \ ' 0 Bar', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
183 \ 'line 3: End of function']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
184 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
185 " go beyond limits does not crash |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
186 call RunDbgCmd(buf, 'fr 100', ['frame at highest level: 1']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
187 call RunDbgCmd(buf, 'fra', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
188 \ '->1 function Foo[2]', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
189 \ ' 0 Bar', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
190 \ 'line 3: End of function']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
191 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
192 call RunDbgCmd(buf, 'frame -40', ['frame is zero']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
193 call RunDbgCmd(buf, 'fram', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
194 \ ' 1 function Foo[2]', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
195 \ '->0 Bar', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
196 \ 'line 3: End of function']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
197 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
198 " final result 19 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
199 call RunDbgCmd(buf, 'cont', ['19']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
200 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
201 " breakpoints tests |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
202 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
203 " Start a debug session, so that reading the last line from the terminal |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
204 " works properly. |
22969
dcb59b1cc0c1
patch 8.2.2031: some tests fail when run under valgrind
Bram Moolenaar <Bram@vim.org>
parents:
22486
diff
changeset
|
205 call RunDbgCmd(buf, ':debug echo Foo()', ['cmd: echo Foo()']) |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
206 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
207 " No breakpoints |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
208 call RunDbgCmd(buf, 'breakl', ['No breakpoints defined']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
209 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
210 " Place some breakpoints |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
211 call RunDbgCmd(buf, 'breaka func Bar') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
212 call RunDbgCmd(buf, 'breaklis', [' 1 func Bar line 1']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
213 call RunDbgCmd(buf, 'breakadd func 3 Bazz') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
214 call RunDbgCmd(buf, 'breaklist', [' 1 func Bar line 1', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
215 \ ' 2 func Bazz line 3']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
216 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
217 " Check whether the breakpoints are hit |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
218 call RunDbgCmd(buf, 'cont', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
219 \ 'Breakpoint in "Bar" line 1', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
220 \ 'function Foo[2]..Bar', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
221 \ 'line 1: let var1 = 2 + a:var']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
222 call RunDbgCmd(buf, 'cont', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
223 \ 'Breakpoint in "Bazz" line 3', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
224 \ 'function Foo[2]..Bar[2]..Bazz', |
16372
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
225 \ 'line 3: let var3 = "another var"']) |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
226 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
227 " Delete the breakpoints |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
228 call RunDbgCmd(buf, 'breakd 1') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
229 call RunDbgCmd(buf, 'breakli', [' 2 func Bazz line 3']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
230 call RunDbgCmd(buf, 'breakdel func 3 Bazz') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
231 call RunDbgCmd(buf, 'breakl', ['No breakpoints defined']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
232 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
233 call RunDbgCmd(buf, 'cont') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
234 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
235 " Make sure the breakpoints are removed |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
236 call RunDbgCmd(buf, ':echo Foo()', ['19']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
237 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
238 " Delete a non-existing breakpoint |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
239 call RunDbgCmd(buf, ':breakdel 2', ['E161: Breakpoint not found: 2']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
240 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
241 " Expression breakpoint |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
242 call RunDbgCmd(buf, ':breakadd func 2 Bazz') |
16372
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
243 call RunDbgCmd(buf, ':echo Bazz(1)', [ |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
244 \ 'Entering Debug mode. Type "cont" to continue.', |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
245 \ 'function Bazz', |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
246 \ 'line 2: let var1 = 3 + a:var']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
247 call RunDbgCmd(buf, 'step') |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
248 call RunDbgCmd(buf, 'step') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
249 call RunDbgCmd(buf, 'breaka expr var3') |
16372
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
250 call RunDbgCmd(buf, 'breakl', [' 3 func Bazz line 2', |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
251 \ ' 4 expr var3']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
252 call RunDbgCmd(buf, 'cont', ['Breakpoint in "Bazz" line 5', |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
253 \ 'Oldval = "''another var''"', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
254 \ 'Newval = "''value2''"', |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
255 \ 'function Bazz', |
16372
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
256 \ 'line 5: catch']) |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
257 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
258 call RunDbgCmd(buf, 'breakdel *') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
259 call RunDbgCmd(buf, 'breakl', ['No breakpoints defined']) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
260 |
16372
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
261 " Check for error cases |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
262 call RunDbgCmd(buf, 'breakadd abcd', [ |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
263 \ 'Error detected while processing function Bazz:', |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
264 \ 'line 5:', |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
265 \ 'E475: Invalid argument: abcd']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
266 call RunDbgCmd(buf, 'breakadd func', ['E475: Invalid argument: func']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
267 call RunDbgCmd(buf, 'breakadd func 2', ['E475: Invalid argument: func 2']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
268 call RunDbgCmd(buf, 'breaka func a()', ['E475: Invalid argument: func a()']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
269 call RunDbgCmd(buf, 'breakd abcd', ['E475: Invalid argument: abcd']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
270 call RunDbgCmd(buf, 'breakd func', ['E475: Invalid argument: func']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
271 call RunDbgCmd(buf, 'breakd func a()', ['E475: Invalid argument: func a()']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
272 call RunDbgCmd(buf, 'breakd func a', ['E161: Breakpoint not found: func a']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
273 call RunDbgCmd(buf, 'breakd expr', ['E475: Invalid argument: expr']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
274 call RunDbgCmd(buf, 'breakd expr x', [ |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
275 \ 'E121: Undefined variable: x', |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
276 \ 'E161: Breakpoint not found: expr x']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
277 |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
278 " finish the current function |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
279 call RunDbgCmd(buf, 'finish', [ |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
280 \ 'function Bazz', |
16372
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
281 \ 'line 8: End of function']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
282 call RunDbgCmd(buf, 'cont') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
283 |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
284 " Test for :next |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
285 call RunDbgCmd(buf, ':debug echo Bar(1)') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
286 call RunDbgCmd(buf, 'step') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
287 call RunDbgCmd(buf, 'next') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
288 call RunDbgCmd(buf, '', [ |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
289 \ 'function Bar', |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
290 \ 'line 3: return var2']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
291 call RunDbgCmd(buf, 'c') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
292 |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
293 " Test for :interrupt |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
294 call RunDbgCmd(buf, ':debug echo Bazz(1)') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
295 call RunDbgCmd(buf, 'step') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
296 call RunDbgCmd(buf, 'step') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
297 call RunDbgCmd(buf, 'interrupt', [ |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
298 \ 'Exception thrown: Vim:Interrupt', |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
299 \ 'function Bazz', |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
300 \ 'line 5: catch']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
301 call RunDbgCmd(buf, 'c') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
302 |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
303 " Test for :quit |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
304 call RunDbgCmd(buf, ':debug echo Foo()') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
305 call RunDbgCmd(buf, 'breakdel *') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
306 call RunDbgCmd(buf, 'breakadd func 3 Foo') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
307 call RunDbgCmd(buf, 'breakadd func 3 Bazz') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
308 call RunDbgCmd(buf, 'cont', [ |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
309 \ 'Breakpoint in "Bazz" line 3', |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
310 \ 'function Foo[2]..Bar[2]..Bazz', |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
311 \ 'line 3: let var3 = "another var"']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
312 call RunDbgCmd(buf, 'quit', [ |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
313 \ 'Breakpoint in "Foo" line 3', |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
314 \ 'function Foo', |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
315 \ 'line 3: return var2']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
316 call RunDbgCmd(buf, 'breakdel *') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
317 call RunDbgCmd(buf, 'quit') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
318 call RunDbgCmd(buf, 'enew! | only!') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
319 |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
320 call StopVimInTerminal(buf) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
321 |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
322 " Tests for :breakadd file and :breakadd here |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
323 " Breakpoints should be set before sourcing the file |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
324 |
17172
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
325 let lines =<< trim END |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
326 let var1 = 10 |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
327 let var2 = 20 |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
328 let var3 = 30 |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
329 let var4 = 40 |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
330 END |
6990c1160ea5
patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents:
16965
diff
changeset
|
331 call writefile(lines, 'Xtest.vim') |
16372
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
332 |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
333 " Start Vim in a terminal |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
334 let buf = RunVimInTerminal('Xtest.vim', {}) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
335 call RunDbgCmd(buf, ':breakadd file 2 Xtest.vim') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
336 call RunDbgCmd(buf, ':4 | breakadd here') |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
337 call RunDbgCmd(buf, ':source Xtest.vim', ['line 2: let var2 = 20']) |
5900941b2e37
patch 8.1.1191: not all debug commands are covered by a test
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
338 call RunDbgCmd(buf, 'cont', ['line 4: let var4 = 40']) |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
339 call RunDbgCmd(buf, 'cont') |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
340 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
341 call StopVimInTerminal(buf) |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
342 |
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
343 call delete('Xtest.vim') |
21781
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
344 %bw! |
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
345 call assert_fails('breakadd here', 'E32:') |
22375
595ea7f099cd
patch 8.2.1736: failure to compile a pattern not tested much
Bram Moolenaar <Bram@vim.org>
parents:
21917
diff
changeset
|
346 call assert_fails('breakadd file Xtest.vim /\)/', 'E55:') |
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
347 endfunc |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
348 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
349 func Test_Backtrace_Through_Source() |
21687
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
350 CheckCWD |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
351 let file1 =<< trim END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
352 func SourceAnotherFile() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
353 source Xtest2.vim |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
354 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
355 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
356 func CallAFunction() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
357 call SourceAnotherFile() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
358 call File2Function() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
359 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
360 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
361 func GlobalFunction() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
362 call CallAFunction() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
363 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
364 END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
365 call writefile(file1, 'Xtest1.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
366 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
367 let file2 =<< trim END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
368 func DoAThing() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
369 echo "DoAThing" |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
370 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
371 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
372 func File2Function() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
373 call DoAThing() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
374 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
375 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
376 call File2Function() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
377 END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
378 call writefile(file2, 'Xtest2.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
379 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
380 let buf = RunVimInTerminal('-S Xtest1.vim', {}) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
381 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
382 call RunDbgCmd(buf, |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
383 \ ':debug call GlobalFunction()', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
384 \ ['cmd: call GlobalFunction()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
385 call RunDbgCmd(buf, 'step', ['line 1: call CallAFunction()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
386 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
387 call RunDbgCmd(buf, 'backtrace', ['>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
388 \ '->0 function GlobalFunction', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
389 \ 'line 1: call CallAFunction()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
390 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
391 call RunDbgCmd(buf, 'step', ['line 1: call SourceAnotherFile()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
392 call RunDbgCmd(buf, 'step', ['line 1: source Xtest2.vim']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
393 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
394 call RunDbgCmd(buf, 'backtrace', ['>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
395 \ ' 2 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
396 \ ' 1 CallAFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
397 \ '->0 SourceAnotherFile', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
398 \ 'line 1: source Xtest2.vim']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
399 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
400 " Step into the 'source' command. Note that we print the full trace all the |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
401 " way though the source command. |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
402 call RunDbgCmd(buf, 'step', ['line 1: func DoAThing()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
403 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
404 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
405 \ ' 3 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
406 \ ' 2 CallAFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
407 \ ' 1 SourceAnotherFile[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
408 \ '->0 script ' .. getcwd() .. '/Xtest2.vim', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
409 \ 'line 1: func DoAThing()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
410 |
21687
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
411 call RunDbgCmd( buf, 'up' ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
412 call RunDbgCmd( buf, 'backtrace', [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
413 \ '>backtrace', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
414 \ ' 3 function GlobalFunction[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
415 \ ' 2 CallAFunction[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
416 \ '->1 SourceAnotherFile[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
417 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
418 \ 'line 1: func DoAThing()' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
419 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
420 call RunDbgCmd( buf, 'up' ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
421 call RunDbgCmd( buf, 'backtrace', [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
422 \ '>backtrace', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
423 \ ' 3 function GlobalFunction[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
424 \ '->2 CallAFunction[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
425 \ ' 1 SourceAnotherFile[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
426 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
427 \ 'line 1: func DoAThing()' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
428 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
429 call RunDbgCmd( buf, 'up' ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
430 call RunDbgCmd( buf, 'backtrace', [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
431 \ '>backtrace', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
432 \ '->3 function GlobalFunction[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
433 \ ' 2 CallAFunction[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
434 \ ' 1 SourceAnotherFile[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
435 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
436 \ 'line 1: func DoAThing()' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
437 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
438 call RunDbgCmd( buf, 'up', [ 'frame at highest level: 3' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
439 call RunDbgCmd( buf, 'backtrace', [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
440 \ '>backtrace', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
441 \ '->3 function GlobalFunction[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
442 \ ' 2 CallAFunction[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
443 \ ' 1 SourceAnotherFile[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
444 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
445 \ 'line 1: func DoAThing()' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
446 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
447 call RunDbgCmd( buf, 'down' ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
448 call RunDbgCmd( buf, 'backtrace', [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
449 \ '>backtrace', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
450 \ ' 3 function GlobalFunction[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
451 \ '->2 CallAFunction[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
452 \ ' 1 SourceAnotherFile[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
453 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
454 \ 'line 1: func DoAThing()' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
455 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
456 call RunDbgCmd( buf, 'down' ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
457 call RunDbgCmd( buf, 'backtrace', [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
458 \ '>backtrace', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
459 \ ' 3 function GlobalFunction[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
460 \ ' 2 CallAFunction[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
461 \ '->1 SourceAnotherFile[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
462 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
463 \ 'line 1: func DoAThing()' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
464 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
465 call RunDbgCmd( buf, 'down' ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
466 call RunDbgCmd( buf, 'backtrace', [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
467 \ '>backtrace', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
468 \ ' 3 function GlobalFunction[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
469 \ ' 2 CallAFunction[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
470 \ ' 1 SourceAnotherFile[1]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
471 \ '->0 script ' .. getcwd() .. '/Xtest2.vim', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
472 \ 'line 1: func DoAThing()' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
473 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
474 call RunDbgCmd( buf, 'down', [ 'frame is zero' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
475 |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
476 " step until we have another meaninfgul trace |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
477 call RunDbgCmd(buf, 'step', ['line 5: func File2Function()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
478 call RunDbgCmd(buf, 'step', ['line 9: call File2Function()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
479 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
480 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
481 \ ' 3 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
482 \ ' 2 CallAFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
483 \ ' 1 SourceAnotherFile[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
484 \ '->0 script ' .. getcwd() .. '/Xtest2.vim', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
485 \ 'line 9: call File2Function()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
486 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
487 call RunDbgCmd(buf, 'step', ['line 1: call DoAThing()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
488 call RunDbgCmd(buf, 'step', ['line 1: echo "DoAThing"']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
489 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
490 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
491 \ ' 5 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
492 \ ' 4 CallAFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
493 \ ' 3 SourceAnotherFile[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
494 \ ' 2 script ' .. getcwd() .. '/Xtest2.vim[9]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
495 \ ' 1 function File2Function[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
496 \ '->0 DoAThing', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
497 \ 'line 1: echo "DoAThing"']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
498 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
499 " Now, step (back to Xfile1.vim), and call the function _in_ Xfile2.vim |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
500 call RunDbgCmd(buf, 'step', ['line 1: End of function']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
501 call RunDbgCmd(buf, 'step', ['line 1: End of function']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
502 call RunDbgCmd(buf, 'step', ['line 10: End of sourced file']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
503 call RunDbgCmd(buf, 'step', ['line 1: End of function']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
504 call RunDbgCmd(buf, 'step', ['line 2: call File2Function()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
505 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
506 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
507 \ ' 1 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
508 \ '->0 CallAFunction', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
509 \ 'line 2: call File2Function()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
510 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
511 call RunDbgCmd(buf, 'step', ['line 1: call DoAThing()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
512 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
513 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
514 \ ' 2 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
515 \ ' 1 CallAFunction[2]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
516 \ '->0 File2Function', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
517 \ 'line 1: call DoAThing()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
518 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
519 call StopVimInTerminal(buf) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
520 call delete('Xtest1.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
521 call delete('Xtest2.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
522 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
523 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
524 func Test_Backtrace_Autocmd() |
21687
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
525 CheckCWD |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
526 let file1 =<< trim END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
527 func SourceAnotherFile() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
528 source Xtest2.vim |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
529 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
530 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
531 func CallAFunction() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
532 call SourceAnotherFile() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
533 call File2Function() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
534 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
535 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
536 func GlobalFunction() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
537 call CallAFunction() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
538 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
539 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
540 au User TestGlobalFunction :call GlobalFunction() | echo "Done" |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
541 END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
542 call writefile(file1, 'Xtest1.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
543 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
544 let file2 =<< trim END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
545 func DoAThing() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
546 echo "DoAThing" |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
547 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
548 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
549 func File2Function() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
550 call DoAThing() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
551 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
552 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
553 call File2Function() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
554 END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
555 call writefile(file2, 'Xtest2.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
556 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
557 let buf = RunVimInTerminal('-S Xtest1.vim', {}) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
558 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
559 call RunDbgCmd(buf, |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
560 \ ':debug doautocmd User TestGlobalFunction', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
561 \ ['cmd: doautocmd User TestGlobalFunction']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
562 call RunDbgCmd(buf, 'step', ['cmd: call GlobalFunction() | echo "Done"']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
563 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
564 " At this point the ontly thing in the stack is the autocommand |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
565 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
566 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
567 \ '->0 User Autocommands for "TestGlobalFunction"', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
568 \ 'cmd: call GlobalFunction() | echo "Done"']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
569 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
570 " And now we're back into the call stack |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
571 call RunDbgCmd(buf, 'step', ['line 1: call CallAFunction()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
572 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
573 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
574 \ ' 1 User Autocommands for "TestGlobalFunction"', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
575 \ '->0 function GlobalFunction', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
576 \ 'line 1: call CallAFunction()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
577 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
578 call RunDbgCmd(buf, 'step', ['line 1: call SourceAnotherFile()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
579 call RunDbgCmd(buf, 'step', ['line 1: source Xtest2.vim']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
580 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
581 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
582 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
583 \ ' 3 User Autocommands for "TestGlobalFunction"', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
584 \ ' 2 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
585 \ ' 1 CallAFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
586 \ '->0 SourceAnotherFile', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
587 \ 'line 1: source Xtest2.vim']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
588 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
589 " Step into the 'source' command. Note that we print the full trace all the |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
590 " way though the source command. |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
591 call RunDbgCmd(buf, 'step', ['line 1: func DoAThing()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
592 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
593 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
594 \ ' 4 User Autocommands for "TestGlobalFunction"', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
595 \ ' 3 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
596 \ ' 2 CallAFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
597 \ ' 1 SourceAnotherFile[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
598 \ '->0 script ' .. getcwd() .. '/Xtest2.vim', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
599 \ 'line 1: func DoAThing()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
600 |
21917
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
601 call RunDbgCmd( buf, 'up' ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
602 call RunDbgCmd( buf, 'backtrace', [ |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
603 \ '>backtrace', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
604 \ ' 4 User Autocommands for "TestGlobalFunction"', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
605 \ ' 3 function GlobalFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
606 \ ' 2 CallAFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
607 \ '->1 SourceAnotherFile[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
608 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
609 \ 'line 1: func DoAThing()' ] ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
610 |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
611 call RunDbgCmd( buf, 'up' ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
612 call RunDbgCmd( buf, 'backtrace', [ |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
613 \ '>backtrace', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
614 \ ' 4 User Autocommands for "TestGlobalFunction"', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
615 \ ' 3 function GlobalFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
616 \ '->2 CallAFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
617 \ ' 1 SourceAnotherFile[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
618 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
619 \ 'line 1: func DoAThing()' ] ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
620 |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
621 call RunDbgCmd( buf, 'up' ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
622 call RunDbgCmd( buf, 'backtrace', [ |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
623 \ '>backtrace', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
624 \ ' 4 User Autocommands for "TestGlobalFunction"', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
625 \ '->3 function GlobalFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
626 \ ' 2 CallAFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
627 \ ' 1 SourceAnotherFile[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
628 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
629 \ 'line 1: func DoAThing()' ] ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
630 |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
631 call RunDbgCmd( buf, 'up' ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
632 call RunDbgCmd( buf, 'backtrace', [ |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
633 \ '>backtrace', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
634 \ '->4 User Autocommands for "TestGlobalFunction"', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
635 \ ' 3 function GlobalFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
636 \ ' 2 CallAFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
637 \ ' 1 SourceAnotherFile[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
638 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
639 \ 'line 1: func DoAThing()' ] ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
640 |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
641 call RunDbgCmd( buf, 'up', [ 'frame at highest level: 4' ] ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
642 call RunDbgCmd( buf, 'backtrace', [ |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
643 \ '>backtrace', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
644 \ '->4 User Autocommands for "TestGlobalFunction"', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
645 \ ' 3 function GlobalFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
646 \ ' 2 CallAFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
647 \ ' 1 SourceAnotherFile[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
648 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
649 \ 'line 1: func DoAThing()' ] ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
650 |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
651 call RunDbgCmd( buf, 'down' ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
652 call RunDbgCmd( buf, 'backtrace', [ |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
653 \ '>backtrace', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
654 \ ' 4 User Autocommands for "TestGlobalFunction"', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
655 \ '->3 function GlobalFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
656 \ ' 2 CallAFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
657 \ ' 1 SourceAnotherFile[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
658 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
659 \ 'line 1: func DoAThing()' ] ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
660 |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
661 |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
662 call RunDbgCmd( buf, 'down' ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
663 call RunDbgCmd( buf, 'backtrace', [ |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
664 \ '>backtrace', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
665 \ ' 4 User Autocommands for "TestGlobalFunction"', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
666 \ ' 3 function GlobalFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
667 \ '->2 CallAFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
668 \ ' 1 SourceAnotherFile[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
669 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
670 \ 'line 1: func DoAThing()' ] ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
671 |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
672 call RunDbgCmd( buf, 'down' ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
673 call RunDbgCmd( buf, 'backtrace', [ |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
674 \ '>backtrace', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
675 \ ' 4 User Autocommands for "TestGlobalFunction"', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
676 \ ' 3 function GlobalFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
677 \ ' 2 CallAFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
678 \ '->1 SourceAnotherFile[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
679 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
680 \ 'line 1: func DoAThing()' ] ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
681 |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
682 call RunDbgCmd( buf, 'down' ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
683 call RunDbgCmd( buf, 'backtrace', [ |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
684 \ '>backtrace', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
685 \ ' 4 User Autocommands for "TestGlobalFunction"', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
686 \ ' 3 function GlobalFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
687 \ ' 2 CallAFunction[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
688 \ ' 1 SourceAnotherFile[1]', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
689 \ '->0 script ' .. getcwd() .. '/Xtest2.vim', |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
690 \ 'line 1: func DoAThing()' ] ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
691 |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
692 call RunDbgCmd( buf, 'down', [ 'frame is zero' ] ) |
94376326c096
patch 8.2.1508: not all debugger commands covered by tests
Bram Moolenaar <Bram@vim.org>
parents:
21781
diff
changeset
|
693 |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
694 " step until we have another meaninfgul trace |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
695 call RunDbgCmd(buf, 'step', ['line 5: func File2Function()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
696 call RunDbgCmd(buf, 'step', ['line 9: call File2Function()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
697 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
698 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
699 \ ' 4 User Autocommands for "TestGlobalFunction"', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
700 \ ' 3 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
701 \ ' 2 CallAFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
702 \ ' 1 SourceAnotherFile[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
703 \ '->0 script ' .. getcwd() .. '/Xtest2.vim', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
704 \ 'line 9: call File2Function()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
705 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
706 call RunDbgCmd(buf, 'step', ['line 1: call DoAThing()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
707 call RunDbgCmd(buf, 'step', ['line 1: echo "DoAThing"']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
708 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
709 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
710 \ ' 6 User Autocommands for "TestGlobalFunction"', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
711 \ ' 5 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
712 \ ' 4 CallAFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
713 \ ' 3 SourceAnotherFile[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
714 \ ' 2 script ' .. getcwd() .. '/Xtest2.vim[9]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
715 \ ' 1 function File2Function[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
716 \ '->0 DoAThing', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
717 \ 'line 1: echo "DoAThing"']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
718 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
719 " Now, step (back to Xfile1.vim), and call the function _in_ Xfile2.vim |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
720 call RunDbgCmd(buf, 'step', ['line 1: End of function']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
721 call RunDbgCmd(buf, 'step', ['line 1: End of function']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
722 call RunDbgCmd(buf, 'step', ['line 10: End of sourced file']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
723 call RunDbgCmd(buf, 'step', ['line 1: End of function']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
724 call RunDbgCmd(buf, 'step', ['line 2: call File2Function()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
725 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
726 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
727 \ ' 2 User Autocommands for "TestGlobalFunction"', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
728 \ ' 1 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
729 \ '->0 CallAFunction', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
730 \ 'line 2: call File2Function()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
731 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
732 call RunDbgCmd(buf, 'step', ['line 1: call DoAThing()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
733 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
734 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
735 \ ' 3 User Autocommands for "TestGlobalFunction"', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
736 \ ' 2 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
737 \ ' 1 CallAFunction[2]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
738 \ '->0 File2Function', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
739 \ 'line 1: call DoAThing()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
740 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
741 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
742 " Now unwind so that we get back to the original autocommand (and the second |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
743 " cmd echo "Done") |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
744 call RunDbgCmd(buf, 'finish', ['line 1: End of function']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
745 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
746 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
747 \ ' 3 User Autocommands for "TestGlobalFunction"', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
748 \ ' 2 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
749 \ ' 1 CallAFunction[2]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
750 \ '->0 File2Function', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
751 \ 'line 1: End of function']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
752 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
753 call RunDbgCmd(buf, 'finish', ['line 2: End of function']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
754 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
755 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
756 \ ' 2 User Autocommands for "TestGlobalFunction"', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
757 \ ' 1 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
758 \ '->0 CallAFunction', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
759 \ 'line 2: End of function']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
760 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
761 call RunDbgCmd(buf, 'finish', ['line 1: End of function']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
762 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
763 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
764 \ ' 1 User Autocommands for "TestGlobalFunction"', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
765 \ '->0 function GlobalFunction', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
766 \ 'line 1: End of function']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
767 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
768 call RunDbgCmd(buf, 'step', ['cmd: echo "Done"']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
769 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
770 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
771 \ '->0 User Autocommands for "TestGlobalFunction"', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
772 \ 'cmd: echo "Done"']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
773 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
774 call StopVimInTerminal(buf) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
775 call delete('Xtest1.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
776 call delete('Xtest2.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
777 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
778 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
779 func Test_Backtrace_CmdLine() |
21687
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
780 CheckCWD |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
781 let file1 =<< trim END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
782 func SourceAnotherFile() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
783 source Xtest2.vim |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
784 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
785 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
786 func CallAFunction() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
787 call SourceAnotherFile() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
788 call File2Function() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
789 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
790 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
791 func GlobalFunction() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
792 call CallAFunction() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
793 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
794 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
795 au User TestGlobalFunction :call GlobalFunction() | echo "Done" |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
796 END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
797 call writefile(file1, 'Xtest1.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
798 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
799 let file2 =<< trim END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
800 func DoAThing() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
801 echo "DoAThing" |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
802 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
803 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
804 func File2Function() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
805 call DoAThing() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
806 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
807 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
808 call File2Function() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
809 END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
810 call writefile(file2, 'Xtest2.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
811 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
812 let buf = RunVimInTerminal( |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
813 \ '-S Xtest1.vim -c "debug call GlobalFunction()"', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
814 \ {'wait_for_ruler': 0}) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
815 |
22969
dcb59b1cc0c1
patch 8.2.2031: some tests fail when run under valgrind
Bram Moolenaar <Bram@vim.org>
parents:
22486
diff
changeset
|
816 " Need to wait for the vim-in-terminal to be ready. |
dcb59b1cc0c1
patch 8.2.2031: some tests fail when run under valgrind
Bram Moolenaar <Bram@vim.org>
parents:
22486
diff
changeset
|
817 " With valgrind this can take quite long. |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
818 call CheckDbgOutput(buf, ['command line', |
22969
dcb59b1cc0c1
patch 8.2.2031: some tests fail when run under valgrind
Bram Moolenaar <Bram@vim.org>
parents:
22486
diff
changeset
|
819 \ 'cmd: call GlobalFunction()'], #{msec: 5000}) |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
820 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
821 " At this point the ontly thing in the stack is the cmdline |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
822 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
823 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
824 \ '->0 command line', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
825 \ 'cmd: call GlobalFunction()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
826 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
827 " And now we're back into the call stack |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
828 call RunDbgCmd(buf, 'step', ['line 1: call CallAFunction()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
829 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
830 \ '>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
831 \ ' 1 command line', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
832 \ '->0 function GlobalFunction', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
833 \ 'line 1: call CallAFunction()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
834 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
835 call StopVimInTerminal(buf) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
836 call delete('Xtest1.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
837 call delete('Xtest2.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
838 endfunc |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
839 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
840 func Test_Backtrace_DefFunction() |
21687
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
841 CheckCWD |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
842 let file1 =<< trim END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
843 vim9script |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
844 import File2Function from './Xtest2.vim' |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
845 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
846 def SourceAnotherFile() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
847 source Xtest2.vim |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
848 enddef |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
849 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
850 def CallAFunction() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
851 SourceAnotherFile() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
852 File2Function() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
853 enddef |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
854 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
855 def g:GlobalFunction() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
856 CallAFunction() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
857 enddef |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
858 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
859 defcompile |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
860 END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
861 call writefile(file1, 'Xtest1.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
862 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
863 let file2 =<< trim END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
864 vim9script |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
865 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
866 def DoAThing(): number |
22486
4086a1708c83
patch 8.2.1791: Vim9: debugger test fails
Bram Moolenaar <Bram@vim.org>
parents:
22375
diff
changeset
|
867 var a = 100 * 2 |
21508
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
868 a += 3 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
869 return a |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
870 enddef |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
871 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
872 export def File2Function() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
873 DoAThing() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
874 enddef |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
875 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
876 defcompile |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
877 File2Function() |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
878 END |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
879 call writefile(file2, 'Xtest2.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
880 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
881 let buf = RunVimInTerminal('-S Xtest1.vim', {}) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
882 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
883 call RunDbgCmd(buf, |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
884 \ ':debug call GlobalFunction()', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
885 \ ['cmd: call GlobalFunction()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
886 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
887 " FIXME: Vim9 lines are not debugged! |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
888 call RunDbgCmd(buf, 'step', ['line 1: source Xtest2.vim']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
889 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
890 " But they do appear in the backtrace |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
891 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
892 \ '\V>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
893 \ '\V 2 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
894 \ '\V 1 <SNR>\.\*_CallAFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
895 \ '\V->0 <SNR>\.\*_SourceAnotherFile', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
896 \ '\Vline 1: source Xtest2.vim'], |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
897 \ #{match: 'pattern'}) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
898 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
899 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
900 call RunDbgCmd(buf, 'step', ['line 1: vim9script']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
901 call RunDbgCmd(buf, 'step', ['line 3: def DoAThing(): number']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
902 call RunDbgCmd(buf, 'step', ['line 9: export def File2Function()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
903 call RunDbgCmd(buf, 'step', ['line 9: def File2Function()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
904 call RunDbgCmd(buf, 'step', ['line 13: defcompile']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
905 call RunDbgCmd(buf, 'step', ['line 14: File2Function()']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
906 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
907 \ '\V>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
908 \ '\V 3 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
909 \ '\V 2 <SNR>\.\*_CallAFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
910 \ '\V 1 <SNR>\.\*_SourceAnotherFile[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
911 \ '\V->0 script ' .. getcwd() .. '/Xtest2.vim', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
912 \ '\Vline 14: File2Function()'], |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
913 \ #{match: 'pattern'}) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
914 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
915 " Don't step into compiled functions... |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
916 call RunDbgCmd(buf, 'step', ['line 15: End of sourced file']) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
917 call RunDbgCmd(buf, 'backtrace', [ |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
918 \ '\V>backtrace', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
919 \ '\V 3 function GlobalFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
920 \ '\V 2 <SNR>\.\*_CallAFunction[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
921 \ '\V 1 <SNR>\.\*_SourceAnotherFile[1]', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
922 \ '\V->0 script ' .. getcwd() .. '/Xtest2.vim', |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
923 \ '\Vline 15: End of sourced file'], |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
924 \ #{match: 'pattern'}) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
925 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
926 |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
927 call StopVimInTerminal(buf) |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
928 call delete('Xtest1.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
929 call delete('Xtest2.vim') |
6b2a5418cbc3
patch 8.2.1304: debug backtrace isn't tested much
Bram Moolenaar <Bram@vim.org>
parents:
19954
diff
changeset
|
930 endfunc |
21687
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
931 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
932 func Test_debug_backtrace_level() |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
933 CheckCWD |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
934 let lines =<< trim END |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
935 let s:file1_var = 'file1' |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
936 let g:global_var = 'global' |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
937 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
938 func s:File1Func( arg ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
939 let s:file1_var .= a:arg |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
940 let local_var = s:file1_var .. ' test1' |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
941 let g:global_var .= local_var |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
942 source Xtest2.vim |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
943 endfunc |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
944 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
945 call s:File1Func( 'arg1' ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
946 END |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
947 call writefile(lines, 'Xtest1.vim') |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
948 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
949 let lines =<< trim END |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
950 let s:file2_var = 'file2' |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
951 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
952 func s:File2Func( arg ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
953 let s:file2_var .= a:arg |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
954 let local_var = s:file2_var .. ' test2' |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
955 let g:global_var .= local_var |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
956 endfunc |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
957 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
958 call s:File2Func( 'arg2' ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
959 END |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
960 call writefile(lines, 'Xtest2.vim') |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
961 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
962 let file1 = getcwd() .. '/Xtest1.vim' |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
963 let file2 = getcwd() .. '/Xtest2.vim' |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
964 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
965 " set a breakpoint and source file1.vim |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
966 let buf = RunVimInTerminal( |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
967 \ '-c "breakadd file 1 Xtest1.vim" -S Xtest1.vim', |
22969
dcb59b1cc0c1
patch 8.2.2031: some tests fail when run under valgrind
Bram Moolenaar <Bram@vim.org>
parents:
22486
diff
changeset
|
968 \ #{wait_for_ruler: 0}) |
21687
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
969 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
970 call CheckDbgOutput(buf, [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
971 \ 'Breakpoint in "' .. file1 .. '" line 1', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
972 \ 'Entering Debug mode. Type "cont" to continue.', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
973 \ 'command line..script ' .. file1, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
974 \ 'line 1: let s:file1_var = ''file1''' |
22969
dcb59b1cc0c1
patch 8.2.2031: some tests fail when run under valgrind
Bram Moolenaar <Bram@vim.org>
parents:
22486
diff
changeset
|
975 \ ], #{msec: 5000}) |
21687
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
976 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
977 " step throught the initial declarations |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
978 call RunDbgCmd(buf, 'step', [ 'line 2: let g:global_var = ''global''' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
979 call RunDbgCmd(buf, 'step', [ 'line 4: func s:File1Func( arg )' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
980 call RunDbgCmd(buf, 'echo s:file1_var', [ 'file1' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
981 call RunDbgCmd(buf, 'echo g:global_var', [ 'global' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
982 call RunDbgCmd(buf, 'echo global_var', [ 'global' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
983 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
984 " step in to the first function |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
985 call RunDbgCmd(buf, 'step', [ 'line 11: call s:File1Func( ''arg1'' )' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
986 call RunDbgCmd(buf, 'step', [ 'line 1: let s:file1_var .= a:arg' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
987 call RunDbgCmd(buf, 'echo a:arg', [ 'arg1' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
988 call RunDbgCmd(buf, 'echo s:file1_var', [ 'file1' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
989 call RunDbgCmd(buf, 'echo g:global_var', [ 'global' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
990 call RunDbgCmd(buf, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
991 \'echo global_var', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
992 \[ 'E121: Undefined variable: global_var' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
993 call RunDbgCmd(buf, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
994 \'echo local_var', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
995 \[ 'E121: Undefined variable: local_var' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
996 call RunDbgCmd(buf, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
997 \'echo l:local_var', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
998 \[ 'E121: Undefined variable: l:local_var' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
999 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1000 " backtrace up |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1001 call RunDbgCmd(buf, 'backtrace', [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1002 \ '\V>backtrace', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1003 \ '\V 2 command line', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1004 \ '\V 1 script ' .. file1 .. '[11]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1005 \ '\V->0 function <SNR>\.\*_File1Func', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1006 \ '\Vline 1: let s:file1_var .= a:arg', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1007 \ ], |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1008 \ #{ match: 'pattern' } ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1009 call RunDbgCmd(buf, 'up', [ '>up' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1010 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1011 call RunDbgCmd(buf, 'backtrace', [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1012 \ '\V>backtrace', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1013 \ '\V 2 command line', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1014 \ '\V->1 script ' .. file1 .. '[11]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1015 \ '\V 0 function <SNR>\.\*_File1Func', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1016 \ '\Vline 1: let s:file1_var .= a:arg', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1017 \ ], |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1018 \ #{ match: 'pattern' } ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1019 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1020 " Expression evaluation in the script frame (not the function frame) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1021 " FIXME: Unexpected in this scope (a: should not be visibnle) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1022 call RunDbgCmd(buf, 'echo a:arg', [ 'arg1' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1023 call RunDbgCmd(buf, 'echo s:file1_var', [ 'file1' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1024 call RunDbgCmd(buf, 'echo g:global_var', [ 'global' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1025 " FIXME: Unexpected in this scope (global should be found) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1026 call RunDbgCmd(buf, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1027 \'echo global_var', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1028 \[ 'E121: Undefined variable: global_var' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1029 call RunDbgCmd(buf, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1030 \'echo local_var', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1031 \[ 'E121: Undefined variable: local_var' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1032 call RunDbgCmd(buf, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1033 \'echo l:local_var', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1034 \[ 'E121: Undefined variable: l:local_var' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1035 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1036 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1037 " step while backtraced jumps to the latest frame |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1038 call RunDbgCmd(buf, 'step', [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1039 \ 'line 2: let local_var = s:file1_var .. '' test1''' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1040 call RunDbgCmd(buf, 'backtrace', [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1041 \ '\V>backtrace', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1042 \ '\V 2 command line', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1043 \ '\V 1 script ' .. file1 .. '[11]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1044 \ '\V->0 function <SNR>\.\*_File1Func', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1045 \ '\Vline 2: let local_var = s:file1_var .. '' test1''', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1046 \ ], |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1047 \ #{ match: 'pattern' } ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1048 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1049 call RunDbgCmd(buf, 'step', [ 'line 3: let g:global_var .= local_var' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1050 call RunDbgCmd(buf, 'echo local_var', [ 'file1arg1 test1' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1051 call RunDbgCmd(buf, 'echo l:local_var', [ 'file1arg1 test1' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1052 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1053 call RunDbgCmd(buf, 'step', [ 'line 4: source Xtest2.vim' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1054 call RunDbgCmd(buf, 'step', [ 'line 1: let s:file2_var = ''file2''' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1055 call RunDbgCmd(buf, 'backtrace', [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1056 \ '\V>backtrace', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1057 \ '\V 3 command line', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1058 \ '\V 2 script ' .. file1 .. '[11]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1059 \ '\V 1 function <SNR>\.\*_File1Func[4]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1060 \ '\V->0 script ' .. file2, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1061 \ '\Vline 1: let s:file2_var = ''file2''', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1062 \ ], |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1063 \ #{ match: 'pattern' } ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1064 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1065 " Expression evaluation in the script frame file2 (not the function frame) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1066 call RunDbgCmd(buf, 'echo a:arg', [ 'E121: Undefined variable: a:arg' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1067 call RunDbgCmd(buf, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1068 \ 'echo s:file1_var', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1069 \ [ 'E121: Undefined variable: s:file1_var' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1070 call RunDbgCmd(buf, 'echo g:global_var', [ 'globalfile1arg1 test1' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1071 call RunDbgCmd(buf, 'echo global_var', [ 'globalfile1arg1 test1' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1072 call RunDbgCmd(buf, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1073 \'echo local_var', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1074 \[ 'E121: Undefined variable: local_var' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1075 call RunDbgCmd(buf, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1076 \'echo l:local_var', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1077 \[ 'E121: Undefined variable: l:local_var' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1078 call RunDbgCmd(buf, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1079 \ 'echo s:file2_var', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1080 \ [ 'E121: Undefined variable: s:file2_var' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1081 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1082 call RunDbgCmd(buf, 'step', [ 'line 3: func s:File2Func( arg )' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1083 call RunDbgCmd(buf, 'echo s:file2_var', [ 'file2' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1084 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1085 " Up the stack to the other script context |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1086 call RunDbgCmd(buf, 'up') |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1087 call RunDbgCmd(buf, 'backtrace', [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1088 \ '\V>backtrace', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1089 \ '\V 3 command line', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1090 \ '\V 2 script ' .. file1 .. '[11]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1091 \ '\V->1 function <SNR>\.\*_File1Func[4]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1092 \ '\V 0 script ' .. file2, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1093 \ '\Vline 3: func s:File2Func( arg )', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1094 \ ], |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1095 \ #{ match: 'pattern' } ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1096 " FIXME: Unexpected. Should see the a: and l: dicts from File1Func |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1097 call RunDbgCmd(buf, 'echo a:arg', [ 'E121: Undefined variable: a:arg' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1098 call RunDbgCmd(buf, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1099 \ 'echo l:local_var', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1100 \ [ 'E121: Undefined variable: l:local_var' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1101 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1102 call RunDbgCmd(buf, 'up') |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1103 call RunDbgCmd(buf, 'backtrace', [ |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1104 \ '\V>backtrace', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1105 \ '\V 3 command line', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1106 \ '\V->2 script ' .. file1 .. '[11]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1107 \ '\V 1 function <SNR>\.\*_File1Func[4]', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1108 \ '\V 0 script ' .. file2, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1109 \ '\Vline 3: func s:File2Func( arg )', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1110 \ ], |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1111 \ #{ match: 'pattern' } ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1112 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1113 " FIXME: Unexpected (wrong script vars are used) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1114 call RunDbgCmd(buf, |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1115 \ 'echo s:file1_var', |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1116 \ [ 'E121: Undefined variable: s:file1_var' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1117 call RunDbgCmd(buf, 'echo s:file2_var', [ 'file2' ] ) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1118 |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1119 call StopVimInTerminal(buf) |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1120 call delete('Xtest1.vim') |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1121 call delete('Xtest2.vim') |
83b618c0315d
patch 8.2.1393: insufficient testing for script debugging
Bram Moolenaar <Bram@vim.org>
parents:
21508
diff
changeset
|
1122 endfunc |
21765
08940efa6b4e
patch 8.2.1432: various inconsistencies in test files
Bram Moolenaar <Bram@vim.org>
parents:
21687
diff
changeset
|
1123 |
21777
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1124 " Test for setting a breakpoint on a :endif where the :if condition is false |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1125 " and then quit the script. This should generate an interrupt. |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1126 func Test_breakpt_endif_intr() |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1127 func F() |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1128 let g:Xpath ..= 'a' |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1129 if v:false |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1130 let g:Xpath ..= 'b' |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1131 endif |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1132 invalid_command |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1133 endfunc |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1134 |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1135 let g:Xpath = '' |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1136 breakadd func 4 F |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1137 try |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1138 let caught_intr = 0 |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1139 debuggreedy |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1140 call feedkeys(":call F()\<CR>quit\<CR>", "xt") |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1141 catch /^Vim:Interrupt$/ |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1142 call assert_match('\.F, line 4', v:throwpoint) |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1143 let caught_intr = 1 |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1144 endtry |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1145 0debuggreedy |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1146 call assert_equal(1, caught_intr) |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1147 call assert_equal('a', g:Xpath) |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1148 breakdel * |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1149 delfunc F |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1150 endfunc |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1151 |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1152 " Test for setting a breakpoint on a :else where the :if condition is false |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1153 " and then quit the script. This should generate an interrupt. |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1154 func Test_breakpt_else_intr() |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1155 func F() |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1156 let g:Xpath ..= 'a' |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1157 if v:false |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1158 let g:Xpath ..= 'b' |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1159 else |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1160 invalid_command |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1161 endif |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1162 invalid_command |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1163 endfunc |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1164 |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1165 let g:Xpath = '' |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1166 breakadd func 4 F |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1167 try |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1168 let caught_intr = 0 |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1169 debuggreedy |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1170 call feedkeys(":call F()\<CR>quit\<CR>", "xt") |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1171 catch /^Vim:Interrupt$/ |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1172 call assert_match('\.F, line 4', v:throwpoint) |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1173 let caught_intr = 1 |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1174 endtry |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1175 0debuggreedy |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1176 call assert_equal(1, caught_intr) |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1177 call assert_equal('a', g:Xpath) |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1178 breakdel * |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1179 delfunc F |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1180 endfunc |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1181 |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1182 " Test for setting a breakpoint on a :endwhile where the :while condition is |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1183 " false and then quit the script. This should generate an interrupt. |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1184 func Test_breakpt_endwhile_intr() |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1185 func F() |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1186 let g:Xpath ..= 'a' |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1187 while v:false |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1188 let g:Xpath ..= 'b' |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1189 endwhile |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1190 invalid_command |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1191 endfunc |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1192 |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1193 let g:Xpath = '' |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1194 breakadd func 4 F |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1195 try |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1196 let caught_intr = 0 |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1197 debuggreedy |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1198 call feedkeys(":call F()\<CR>quit\<CR>", "xt") |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1199 catch /^Vim:Interrupt$/ |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1200 call assert_match('\.F, line 4', v:throwpoint) |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1201 let caught_intr = 1 |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1202 endtry |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1203 0debuggreedy |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1204 call assert_equal(1, caught_intr) |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1205 call assert_equal('a', g:Xpath) |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1206 breakdel * |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1207 delfunc F |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1208 endfunc |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1209 |
21781
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
1210 " Test for setting a breakpoint on a script local function |
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
1211 func Test_breakpt_scriptlocal_func() |
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
1212 let g:Xpath = '' |
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
1213 func s:G() |
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
1214 let g:Xpath ..= 'a' |
21777
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1215 endfunc |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1216 |
21781
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
1217 let funcname = expand("<SID>") .. "G" |
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
1218 exe "breakadd func 1 " .. funcname |
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
1219 debuggreedy |
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
1220 redir => output |
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
1221 call feedkeys(":call " .. funcname .. "()\<CR>c\<CR>", "xt") |
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
1222 redir END |
21777
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1223 0debuggreedy |
21781
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
1224 call assert_match('Breakpoint in "' .. funcname .. '" line 1', output) |
21777
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1225 call assert_equal('a', g:Xpath) |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1226 breakdel * |
21781
99fe9e960207
patch 8.2.1440: debugger code insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents:
21777
diff
changeset
|
1227 exe "delfunc " .. funcname |
21777
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1228 endfunc |
4279767da6e8
patch 8.2.1438: missing tests for interrupting script execution from debugger
Bram Moolenaar <Bram@vim.org>
parents:
21765
diff
changeset
|
1229 |
21765
08940efa6b4e
patch 8.2.1432: various inconsistencies in test files
Bram Moolenaar <Bram@vim.org>
parents:
21687
diff
changeset
|
1230 " vim: shiftwidth=2 sts=2 expandtab |