vim: src/testdir/test_debugger.vim annotate

annotate src/testdir/test_debugger.vim @ 21781:99fe9e960207 v8.2.1440

patch 8.2.1440: debugger code insufficiently tested Commit: https://github.com/vim/vim/commit/16c6232cad40af37f37dc9c561392b7761b9e229 Author: Bram Moolenaar <Bram@vim.org> Date: Thu Aug 13 19:20:04 2020 +0200 patch 8.2.1440: debugger code insufficiently tested Problem: Debugger code insufficiently tested. Solution: Add a few more tests. (Yegappan Lakshmanan, closes https://github.com/vim/vim/issues/6700)

author	Bram Moolenaar <Bram@vim.org>
date	Thu, 13 Aug 2020 19:30:04 +0200
parents	4279767da6e8
children	94376326c096

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

Mercurial > vim

annotate src/testdir/test_debugger.vim @ 21781:99fe9e960207 v8.2.1440