vim: src/testdir/test_debugger.vim annotate

annotate src/testdir/test_debugger.vim @ 21508:6b2a5418cbc3 v8.2.1304

patch 8.2.1304: debug backtrace isn't tested much Commit: https://github.com/vim/vim/commit/6ca6ca48898750dd55cad13c88a9c1dfd7fdaad5 Author: Bram Moolenaar <Bram@vim.org> Date: Mon Jul 27 19:47:07 2020 +0200 patch 8.2.1304: debug backtrace isn't tested much Problem: Debug backtrace isn't tested much. Solution: Add more specific tests. (Ben Jackson, closes https://github.com/vim/vim/issues/6540)

author	Bram Moolenaar <Bram@vim.org>
date	Mon, 27 Jul 2020 20:00:04 +0200
parents	c087099e9163
children	83b618c0315d

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
21508 6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	7 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	8 " Verify the expected output
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	9 let lnum = 20 - len(a:lines)
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	10 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	11 if get(a:options, 'match', 'equal') ==# 'pattern'
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	12 call WaitForAssert({-> assert_match(l, term_getline(a:buf, lnum))}, 200)
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	13 else
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	14 call WaitForAssert({-> assert_equal(l, term_getline(a:buf, lnum))}, 200)
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	15 endif
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	16 let lnum += 1
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	17 endfor
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	18 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	19
16350 ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	20 " 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	21 " 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	22 func RunDbgCmd(buf, cmd, ...)
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	23 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	24 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	25
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	26 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	27 let options = #{match: 'equal'}
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	28 if a:0 > 1
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	29 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	30 endif
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	31 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	32 endif
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	33 endfunc
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	34
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	35 " Debugger tests
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	36 func Test_Debugger()
17657 0da9bc55c31a patch 8.1.1826: tests use hand coded feature and option checks Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	37 CheckRunVimInTerminal
16350 ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	38
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	39 " 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	40 let lines =<< trim END
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	41 func Foo()
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	42 let var1 = 1
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	43 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	44 return var2
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	45 endfunc
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	46 func Bar(var)
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	47 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	48 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	49 return var2
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	50 endfunc
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	51 func Bazz(var)
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	52 try
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	53 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	54 let var3 = "another var"
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	55 let var3 = "value2"
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	56 catch
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	57 let var4 = "exception"
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	58 endtry
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	59 return var1
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 END
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	62 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	63
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	64 " 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	65 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	66
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	67 " 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	68 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	69
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	70 " 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	71 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	72 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	73 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	74 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	75 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	76 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	77 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	78
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	79 " check backtrace
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	80 call RunDbgCmd(buf, 'backtrace', [
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	81 \ ' 2 function Foo[2]',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	82 \ ' 1 Bar[2]',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	83 \ '->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	84 \ '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	85
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	86 " 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	87 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	88
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	89 call RunDbgCmd(buf, 'up')
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	90 call RunDbgCmd(buf, 'back', [
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	91 \ ' 2 function Foo[2]',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	92 \ '->1 Bar[2]',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	93 \ ' 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	94 \ '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	95 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	96
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	97 call RunDbgCmd(buf, 'u')
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	98 call RunDbgCmd(buf, 'bt', [
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	99 \ '->2 function Foo[2]',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	100 \ ' 1 Bar[2]',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	101 \ ' 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	102 \ '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	103 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	104
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	105 " Undefined variables
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	106 call RunDbgCmd(buf, 'step')
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	107 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	108 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	109 \ '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	110 \ 'line 4:',
16350 ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	111 \ 'E121: Undefined variable: var3'])
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	112
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	113 " 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	114 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	115 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	116
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	117 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	118 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	119 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	120 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	121 call RunDbgCmd(buf, '')
16350 ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	122 call RunDbgCmd(buf, 'step', [
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	123 \ 'function Foo[2]..Bar',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	124 \ '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	125 call RunDbgCmd(buf, 'up')
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	126
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	127 " Undefined var2
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	128 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	129 \ '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	130 \ 'line 3:',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	131 \ 'E121: Undefined variable: var2'])
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	132
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	133 " 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	134 call RunDbgCmd(buf, 'down')
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	135 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	136
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	137 " Backtrace movements
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	138 call RunDbgCmd(buf, 'b', [
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	139 \ ' 1 function Foo[2]',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	140 \ '->0 Bar',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	141 \ '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	142
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	143 " 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	144 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	145 call RunDbgCmd(buf, 'up')
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	146
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	147 " 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	148 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	149 call RunDbgCmd(buf, 'where', [
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	150 \ '->1 function Foo[2]',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	151 \ ' 0 Bar',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	152 \ '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	153
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	154 " 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	155 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	156
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	157 " relative backtrace movement
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	158 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	159 call RunDbgCmd(buf, 'frame', [
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	160 \ ' 1 function Foo[2]',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	161 \ '->0 Bar',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	162 \ '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	163
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	164 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	165 call RunDbgCmd(buf, 'fram', [
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	166 \ '->1 function Foo[2]',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	167 \ ' 0 Bar',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	168 \ '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	169
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	170 " 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	171 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	172 call RunDbgCmd(buf, 'fra', [
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	173 \ '->1 function Foo[2]',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	174 \ ' 0 Bar',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	175 \ '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	176
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	177 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	178 call RunDbgCmd(buf, 'fram', [
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	179 \ ' 1 function Foo[2]',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	180 \ '->0 Bar',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	181 \ '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	182
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	183 " final result 19
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	184 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	185
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	186 " breakpoints tests
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	187
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	188 " 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	189 " works properly.
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	190 call RunDbgCmd(buf, ':debug echo Foo()')
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 " No breakpoints
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	193 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	194
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	195 " Place some breakpoints
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	196 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	197 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	198 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	199 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	200 \ ' 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	201
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	202 " 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	203 call RunDbgCmd(buf, 'cont', [
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	204 \ '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	205 \ 'function Foo[2]..Bar',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	206 \ '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	207 call RunDbgCmd(buf, 'cont', [
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	208 \ '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	209 \ '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	210 \ '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	211
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	212 " Delete the breakpoints
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	213 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	214 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	215 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	216 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	217
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
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	220 " 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	221 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	222
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	223 " 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	224 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	225
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	226 " Expression breakpoint
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	227 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	228 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	229 \ '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	230 \ '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	231 \ '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	232 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	233 call RunDbgCmd(buf, 'step')
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	234 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	235 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	236 \ ' 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	237 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	238 \ 'Oldval = "''another var''"',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	239 \ 'Newval = "''value2''"',
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	240 \ '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	241 \ 'line 5: catch'])
16350 ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	242
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	243 call RunDbgCmd(buf, 'breakdel *')
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	244 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	245
16372 5900941b2e37 patch 8.1.1191: not all debug commands are covered by a test Bram Moolenaar <Bram@vim.org> parents: 16350 diff changeset	246 " 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	247 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	248 \ '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	249 \ '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	250 \ '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	251 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	252 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	253 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	254 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	255 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	256 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	257 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	258 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	259 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	260 \ '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	261 \ '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	262
16350 ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	263 " finish the current function
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	264 call RunDbgCmd(buf, 'finish', [
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	265 \ '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	266 \ '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	267 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	268
5900941b2e37 patch 8.1.1191: not all debug commands are covered by a test Bram Moolenaar <Bram@vim.org> parents: 16350 diff changeset	269 " 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	270 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	271 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	272 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	273 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	274 \ '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	275 \ '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	276 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	277
5900941b2e37 patch 8.1.1191: not all debug commands are covered by a test Bram Moolenaar <Bram@vim.org> parents: 16350 diff changeset	278 " 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	279 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	280 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	281 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	282 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	283 \ '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	284 \ '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	285 \ '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	286 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	287
5900941b2e37 patch 8.1.1191: not all debug commands are covered by a test Bram Moolenaar <Bram@vim.org> parents: 16350 diff changeset	288 " 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	289 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	290 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	291 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	292 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	293 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	294 \ '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	295 \ '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	296 \ '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	297 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	298 \ '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	299 \ '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	300 \ '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	301 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	302 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	303 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	304
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 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	306
5900941b2e37 patch 8.1.1191: not all debug commands are covered by a test Bram Moolenaar <Bram@vim.org> parents: 16350 diff changeset	307 " 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	308 " 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	309
17172 6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	310 let lines =<< trim END
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	311 let var1 = 10
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	312 let var2 = 20
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	313 let var3 = 30
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	314 let var4 = 40
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	315 END
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	316 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	317
5900941b2e37 patch 8.1.1191: not all debug commands are covered by a test Bram Moolenaar <Bram@vim.org> parents: 16350 diff changeset	318 " 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	319 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	320 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	321 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	322 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	323 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	324 call RunDbgCmd(buf, 'cont')
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	325
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	326 call StopVimInTerminal(buf)
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	327
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	328 call delete('Xtest.vim')
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	329 endfunc
21508 6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	330
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	331 func Test_Backtrace_Through_Source()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	332 CheckRunVimInTerminal
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	333
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	334 let file1 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	335 func SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	336 source Xtest2.vim
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	337 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	338
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	339 func CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	340 call SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	341 call File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	342 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	343
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	344 func GlobalFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	345 call CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	346 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	347 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	348 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	349
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	350 let file2 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	351 func DoAThing()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	352 echo "DoAThing"
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	353 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	354
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	355 func File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	356 call DoAThing()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	357 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	358
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	359 call File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	360 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	361 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	362
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	363 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	364
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	365 call RunDbgCmd(buf,
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	366 \ ':debug call GlobalFunction()',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	367 \ ['cmd: call GlobalFunction()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	368 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	369
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	370 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	371 \ '->0 function GlobalFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	372 \ 'line 1: call CallAFunction()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	373
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	374 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	375 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	376
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	377 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	378 \ ' 2 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	379 \ ' 1 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	380 \ '->0 SourceAnotherFile',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	381 \ '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	382
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	383 " 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	384 " 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	385 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	386 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	387 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	388 \ ' 3 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	389 \ ' 2 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	390 \ ' 1 SourceAnotherFile[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	391 \ '->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	392 \ 'line 1: func DoAThing()'])
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 " 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	395 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	396 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	397 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	398 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	399 \ ' 3 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	400 \ ' 2 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	401 \ ' 1 SourceAnotherFile[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	402 \ '->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	403 \ 'line 9: call File2Function()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	404
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	405 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	406 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	407 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	408 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	409 \ ' 5 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	410 \ ' 4 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	411 \ ' 3 SourceAnotherFile[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	412 \ ' 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	413 \ ' 1 function File2Function[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	414 \ '->0 DoAThing',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	415 \ 'line 1: echo "DoAThing"'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	416
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	417 " 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	418 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	419 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	420 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	421 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	422 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	423 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	424 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	425 \ ' 1 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	426 \ '->0 CallAFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	427 \ 'line 2: call File2Function()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	428
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	429 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	430 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	431 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	432 \ ' 2 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	433 \ ' 1 CallAFunction[2]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	434 \ '->0 File2Function',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	435 \ 'line 1: call DoAThing()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	436
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	437 call StopVimInTerminal(buf)
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	438 call delete('Xtest1.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	439 call delete('Xtest2.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	440 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	441
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	442 func Test_Backtrace_Autocmd()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	443 CheckRunVimInTerminal
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	444
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	445 let file1 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	446 func SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	447 source Xtest2.vim
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	448 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	449
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	450 func CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	451 call SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	452 call File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	453 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	454
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	455 func GlobalFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	456 call CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	457 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	458
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	459 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	460 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	461 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	462
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	463 let file2 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	464 func DoAThing()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	465 echo "DoAThing"
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	466 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	467
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	468 func File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	469 call DoAThing()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	470 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	471
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	472 call File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	473 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	474 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	475
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	476 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	477
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	478 call RunDbgCmd(buf,
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	479 \ ':debug doautocmd User TestGlobalFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	480 \ ['cmd: doautocmd User TestGlobalFunction'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	481 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	482
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	483 " 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	484 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	485 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	486 \ '->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	487 \ '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	488
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	489 " 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	490 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	491 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	492 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	493 \ ' 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	494 \ '->0 function GlobalFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	495 \ 'line 1: call CallAFunction()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	496
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	497 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	498 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	499
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	500 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	501 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	502 \ ' 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	503 \ ' 2 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	504 \ ' 1 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	505 \ '->0 SourceAnotherFile',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	506 \ '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	507
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	508 " 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	509 " 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	510 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	511 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	512 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	513 \ ' 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	514 \ ' 3 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	515 \ ' 2 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	516 \ ' 1 SourceAnotherFile[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	517 \ '->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	518 \ 'line 1: func DoAThing()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	519
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	520 " 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	521 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	522 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	523 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	524 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	525 \ ' 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	526 \ ' 3 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	527 \ ' 2 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	528 \ ' 1 SourceAnotherFile[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	529 \ '->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	530 \ 'line 9: call File2Function()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	531
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	532 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	533 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	534 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	535 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	536 \ ' 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	537 \ ' 5 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	538 \ ' 4 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	539 \ ' 3 SourceAnotherFile[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	540 \ ' 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	541 \ ' 1 function File2Function[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	542 \ '->0 DoAThing',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	543 \ 'line 1: echo "DoAThing"'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	544
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	545 " 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	546 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	547 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	548 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	549 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	550 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	551 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	552 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	553 \ ' 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	554 \ ' 1 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	555 \ '->0 CallAFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	556 \ 'line 2: call File2Function()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	557
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	558 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	559 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	560 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	561 \ ' 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	562 \ ' 2 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	563 \ ' 1 CallAFunction[2]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	564 \ '->0 File2Function',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	565 \ 'line 1: call DoAThing()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	566
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	567
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	568 " 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	569 " cmd echo "Done")
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	570 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	571 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	572 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	573 \ ' 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	574 \ ' 2 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	575 \ ' 1 CallAFunction[2]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	576 \ '->0 File2Function',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	577 \ '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	578
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	579 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	580 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	581 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	582 \ ' 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	583 \ ' 1 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	584 \ '->0 CallAFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	585 \ '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	586
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	587 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	588 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	589 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	590 \ ' 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	591 \ '->0 function GlobalFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	592 \ '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	593
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	594 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	595 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	596 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	597 \ '->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	598 \ 'cmd: echo "Done"'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	599
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	600 call StopVimInTerminal(buf)
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	601 call delete('Xtest1.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	602 call delete('Xtest2.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	603 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	604
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	605 func Test_Backtrace_CmdLine()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	606 CheckRunVimInTerminal
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	607
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	608 let file1 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	609 func SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	610 source Xtest2.vim
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	611 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	612
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	613 func CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	614 call SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	615 call File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	616 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	617
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	618 func GlobalFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	619 call CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	620 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	621
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	622 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	623 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	624 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	625
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	626 let file2 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	627 func DoAThing()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	628 echo "DoAThing"
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	629 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	630
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	631 func File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	632 call DoAThing()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	633 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	634
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	635 call File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	636 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	637 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	638
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	639 let buf = RunVimInTerminal(
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	640 \ '-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	641 \ {'wait_for_ruler': 0})
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	642
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	643 " Need to wait for the vim-in-terminal to be ready
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	644 call CheckDbgOutput(buf, ['command line',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	645 \ 'cmd: call GlobalFunction()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	646
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	647 " 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	648 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	649 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	650 \ '->0 command line',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	651 \ 'cmd: call GlobalFunction()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	652
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	653 " 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	654 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	655 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	656 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	657 \ ' 1 command line',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	658 \ '->0 function GlobalFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	659 \ 'line 1: call CallAFunction()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	660
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	661 call StopVimInTerminal(buf)
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	662 call delete('Xtest1.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	663 call delete('Xtest2.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	664 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	665
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	666 func Test_Backtrace_DefFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	667 CheckRunVimInTerminal
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	668
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	669 let file1 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	670 vim9script
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	671 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	672
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	673 def SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	674 source Xtest2.vim
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	675 enddef
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	676
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	677 def CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	678 SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	679 File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	680 enddef
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	681
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	682 def g:GlobalFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	683 CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	684 enddef
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	685
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	686 defcompile
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	687 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	688 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	689
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	690 let file2 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	691 vim9script
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	692
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	693 def DoAThing(): number
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	694 let a = 100 * 2
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	695 a += 3
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	696 return a
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	697 enddef
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	698
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	699 export def File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	700 DoAThing()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	701 enddef
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	702
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	703 defcompile
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	704 File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	705 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	706 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	707
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	708 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	709
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	710 call RunDbgCmd(buf,
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	711 \ ':debug call GlobalFunction()',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	712 \ ['cmd: call GlobalFunction()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	713
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	714 " 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	715 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	716
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	717 " 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	718 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	719 \ '\V>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	720 \ '\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	721 \ '\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	722 \ '\V->0 <SNR>\.\*_SourceAnotherFile',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	723 \ '\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	724 \ #{match: 'pattern'})
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	725
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	726
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	727 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	728 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	729 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	730 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	731 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	732 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	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 \ '\V>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	735 \ '\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	736 \ '\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	737 \ '\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	738 \ '\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	739 \ '\Vline 14: File2Function()'],
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	740 \ #{match: 'pattern'})
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 " 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	743 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	744 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	745 \ '\V>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	746 \ '\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	747 \ '\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	748 \ '\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	749 \ '\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	750 \ '\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	751 \ #{match: 'pattern'})
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
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	754 call StopVimInTerminal(buf)
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	755 call delete('Xtest1.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	756 call delete('Xtest2.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	757 endfunc

Mercurial > vim

annotate src/testdir/test_debugger.vim @ 21508:6b2a5418cbc3 v8.2.1304