vim: src/testdir/test_debugger.vim annotate

annotate src/testdir/test_debugger.vim @ 21777:4279767da6e8 v8.2.1438

patch 8.2.1438: missing tests for interrupting script execution from debugger Commit: https://github.com/vim/vim/commit/7ac616cb0a52bc72b449e19cf9db93bee116c15a Author: Bram Moolenaar <Bram@vim.org> Date: Wed Aug 12 22:22:09 2020 +0200 patch 8.2.1438: missing tests for interrupting script execution from debugger Problem: Missing tests for interrupting script execution from debugger. Solution: Add tests. (Yegappan Lakshmanan, closes https://github.com/vim/vim/issues/6697)

author	Bram Moolenaar <Bram@vim.org>
date	Wed, 12 Aug 2020 22:30:08 +0200
parents	08940efa6b4e
children	99fe9e960207

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')
ffa791471a4c patch 8.1.1180: Vim script debugger tests are old style Bram Moolenaar <Bram@vim.org> parents: diff changeset	340 endfunc
21508 6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	341
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	342 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	343 CheckCWD
21508 6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	344 let file1 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	345 func SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	346 source Xtest2.vim
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	347 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	348
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	349 func CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	350 call SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	351 call File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	352 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	353
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	354 func GlobalFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	355 call CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	356 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	357 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	358 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	359
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	360 let file2 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	361 func DoAThing()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	362 echo "DoAThing"
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	363 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	364
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	365 func File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	366 call DoAThing()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	367 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	368
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	369 call File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	370 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	371 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	372
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	373 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	374
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	375 call RunDbgCmd(buf,
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	376 \ ':debug call GlobalFunction()',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	377 \ ['cmd: call GlobalFunction()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	378 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	379
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	380 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	381 \ '->0 function GlobalFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	382 \ 'line 1: call CallAFunction()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	383
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	384 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	385 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	386
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	387 call RunDbgCmd(buf, 'backtrace', ['>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	388 \ ' 2 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	389 \ ' 1 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	390 \ '->0 SourceAnotherFile',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	391 \ '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	392
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	393 " 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	394 " 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	395 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	396 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	397 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	398 \ ' 3 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	399 \ ' 2 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	400 \ ' 1 SourceAnotherFile[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	401 \ '->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	402 \ 'line 1: func DoAThing()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	403
21687 83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	404 call RunDbgCmd( buf, 'up' )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	405 call RunDbgCmd( buf, 'backtrace', [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	406 \ '>backtrace',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	407 \ ' 3 function GlobalFunction[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	408 \ ' 2 CallAFunction[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	409 \ '->1 SourceAnotherFile[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	410 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	411 \ 'line 1: func DoAThing()' ] )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	412
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	413 call RunDbgCmd( buf, 'up' )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	414 call RunDbgCmd( buf, 'backtrace', [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	415 \ '>backtrace',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	416 \ ' 3 function GlobalFunction[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	417 \ '->2 CallAFunction[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	418 \ ' 1 SourceAnotherFile[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	419 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	420 \ 'line 1: func DoAThing()' ] )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	421
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	422 call RunDbgCmd( buf, 'up' )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	423 call RunDbgCmd( buf, 'backtrace', [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	424 \ '>backtrace',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	425 \ '->3 function GlobalFunction[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	426 \ ' 2 CallAFunction[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	427 \ ' 1 SourceAnotherFile[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	428 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	429 \ 'line 1: func DoAThing()' ] )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	430
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	431 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	432 call RunDbgCmd( buf, 'backtrace', [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	433 \ '>backtrace',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	434 \ '->3 function GlobalFunction[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	435 \ ' 2 CallAFunction[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	436 \ ' 1 SourceAnotherFile[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	437 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	438 \ 'line 1: func DoAThing()' ] )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	439
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	440 call RunDbgCmd( buf, 'down' )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	441 call RunDbgCmd( buf, 'backtrace', [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	442 \ '>backtrace',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	443 \ ' 3 function GlobalFunction[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	444 \ '->2 CallAFunction[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	445 \ ' 1 SourceAnotherFile[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	446 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	447 \ 'line 1: func DoAThing()' ] )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	448
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	449 call RunDbgCmd( buf, 'down' )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	450 call RunDbgCmd( buf, 'backtrace', [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	451 \ '>backtrace',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	452 \ ' 3 function GlobalFunction[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	453 \ ' 2 CallAFunction[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	454 \ '->1 SourceAnotherFile[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	455 \ ' 0 script ' .. getcwd() .. '/Xtest2.vim',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	456 \ 'line 1: func DoAThing()' ] )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	457
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	458 call RunDbgCmd( buf, 'down' )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	459 call RunDbgCmd( buf, 'backtrace', [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	460 \ '>backtrace',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	461 \ ' 3 function GlobalFunction[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	462 \ ' 2 CallAFunction[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	463 \ ' 1 SourceAnotherFile[1]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	464 \ '->0 script ' .. getcwd() .. '/Xtest2.vim',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	465 \ 'line 1: func DoAThing()' ] )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	466
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	467 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	468
21508 6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	469 " 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	470 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	471 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	472 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	473 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	474 \ ' 3 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	475 \ ' 2 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	476 \ ' 1 SourceAnotherFile[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	477 \ '->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	478 \ 'line 9: call File2Function()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	479
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	480 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	481 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	482 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	483 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	484 \ ' 5 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	485 \ ' 4 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	486 \ ' 3 SourceAnotherFile[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	487 \ ' 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	488 \ ' 1 function File2Function[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	489 \ '->0 DoAThing',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	490 \ 'line 1: echo "DoAThing"'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	491
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	492 " 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	493 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	494 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	495 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	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 2: call File2Function()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	498 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	499 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	500 \ ' 1 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	501 \ '->0 CallAFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	502 \ 'line 2: call File2Function()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	503
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	504 call RunDbgCmd(buf, 'step', ['line 1: call DoAThing()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	505 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	506 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	507 \ ' 2 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	508 \ ' 1 CallAFunction[2]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	509 \ '->0 File2Function',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	510 \ 'line 1: call DoAThing()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	511
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	512 call StopVimInTerminal(buf)
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	513 call delete('Xtest1.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	514 call delete('Xtest2.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	515 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	516
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	517 func Test_Backtrace_Autocmd()
21687 83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	518 CheckCWD
21508 6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	519 let file1 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	520 func SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	521 source Xtest2.vim
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	522 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	523
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	524 func CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	525 call SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	526 call File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	527 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	528
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	529 func GlobalFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	530 call CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	531 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	532
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	533 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	534 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	535 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	536
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	537 let file2 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	538 func DoAThing()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	539 echo "DoAThing"
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	540 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	541
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	542 func File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	543 call DoAThing()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	544 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	545
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	546 call File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	547 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	548 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	549
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	550 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	551
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	552 call RunDbgCmd(buf,
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	553 \ ':debug doautocmd User TestGlobalFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	554 \ ['cmd: doautocmd User TestGlobalFunction'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	555 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	556
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	557 " 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	558 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	559 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	560 \ '->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	561 \ '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	562
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	563 " 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	564 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	565 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	566 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	567 \ ' 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	568 \ '->0 function GlobalFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	569 \ 'line 1: call CallAFunction()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	570
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	571 call RunDbgCmd(buf, 'step', ['line 1: call SourceAnotherFile()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	572 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	573
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	574 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	575 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	576 \ ' 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	577 \ ' 2 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	578 \ ' 1 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	579 \ '->0 SourceAnotherFile',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	580 \ '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	581
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	582 " 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	583 " 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	584 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	585 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	586 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	587 \ ' 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	588 \ ' 3 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	589 \ ' 2 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	590 \ ' 1 SourceAnotherFile[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	591 \ '->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	592 \ 'line 1: func DoAThing()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	593
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	594 " 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	595 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	596 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	597 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	598 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	599 \ ' 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	600 \ ' 3 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	601 \ ' 2 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	602 \ ' 1 SourceAnotherFile[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	603 \ '->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	604 \ 'line 9: call File2Function()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	605
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	606 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	607 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	608 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	609 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	610 \ ' 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	611 \ ' 5 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	612 \ ' 4 CallAFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	613 \ ' 3 SourceAnotherFile[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	614 \ ' 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	615 \ ' 1 function File2Function[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	616 \ '->0 DoAThing',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	617 \ 'line 1: echo "DoAThing"'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	618
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	619 " 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	620 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	621 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	622 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	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 2: call File2Function()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	625 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	626 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	627 \ ' 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	628 \ ' 1 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	629 \ '->0 CallAFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	630 \ 'line 2: call File2Function()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	631
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	632 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	633 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	634 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	635 \ ' 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	636 \ ' 2 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	637 \ ' 1 CallAFunction[2]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	638 \ '->0 File2Function',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	639 \ 'line 1: call DoAThing()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	640
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	641
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	642 " 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	643 " cmd echo "Done")
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	644 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	645 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	646 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	647 \ ' 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	648 \ ' 2 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	649 \ ' 1 CallAFunction[2]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	650 \ '->0 File2Function',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	651 \ '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	652
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	653 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	654 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	655 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	656 \ ' 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	657 \ ' 1 function GlobalFunction[1]',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	658 \ '->0 CallAFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	659 \ '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	660
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	661 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	662 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	663 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	664 \ ' 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	665 \ '->0 function GlobalFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	666 \ '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	667
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	668 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	669 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	670 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	671 \ '->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	672 \ 'cmd: echo "Done"'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	673
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	674 call StopVimInTerminal(buf)
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	675 call delete('Xtest1.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	676 call delete('Xtest2.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	677 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	678
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	679 func Test_Backtrace_CmdLine()
21687 83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	680 CheckCWD
21508 6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	681 let file1 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	682 func SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	683 source Xtest2.vim
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	684 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	685
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	686 func CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	687 call SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	688 call File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	689 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	690
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	691 func GlobalFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	692 call CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	693 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	694
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	695 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	696 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	697 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	698
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	699 let file2 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	700 func DoAThing()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	701 echo "DoAThing"
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	702 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	703
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	704 func File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	705 call DoAThing()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	706 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	707
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	708 call File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	709 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	710 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	711
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	712 let buf = RunVimInTerminal(
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	713 \ '-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	714 \ {'wait_for_ruler': 0})
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	715
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	716 " 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	717 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	718 \ 'cmd: call GlobalFunction()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	719
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	720 " 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	721 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	722 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	723 \ '->0 command line',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	724 \ 'cmd: call GlobalFunction()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	725
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	726 " 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	727 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	728 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	729 \ '>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	730 \ ' 1 command line',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	731 \ '->0 function GlobalFunction',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	732 \ 'line 1: call CallAFunction()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	733
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	734 call StopVimInTerminal(buf)
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	735 call delete('Xtest1.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	736 call delete('Xtest2.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	737 endfunc
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	738
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	739 func Test_Backtrace_DefFunction()
21687 83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	740 CheckCWD
21508 6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	741 let file1 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	742 vim9script
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	743 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	744
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	745 def SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	746 source Xtest2.vim
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	747 enddef
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	748
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	749 def CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	750 SourceAnotherFile()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	751 File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	752 enddef
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	753
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	754 def g:GlobalFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	755 CallAFunction()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	756 enddef
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	757
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	758 defcompile
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	759 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	760 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	761
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	762 let file2 =<< trim END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	763 vim9script
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	764
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	765 def DoAThing(): number
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	766 let a = 100 * 2
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	767 a += 3
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	768 return a
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	769 enddef
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	770
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	771 export def File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	772 DoAThing()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	773 enddef
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	774
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	775 defcompile
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	776 File2Function()
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	777 END
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	778 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	779
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	780 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	781
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	782 call RunDbgCmd(buf,
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	783 \ ':debug call GlobalFunction()',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	784 \ ['cmd: call GlobalFunction()'])
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	785
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	786 " 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	787 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	788
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	789 " 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	790 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	791 \ '\V>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	792 \ '\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	793 \ '\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	794 \ '\V->0 <SNR>\.\*_SourceAnotherFile',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	795 \ '\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	796 \ #{match: 'pattern'})
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	797
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	798
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	799 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	800 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	801 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	802 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	803 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	804 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	805 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	806 \ '\V>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	807 \ '\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	808 \ '\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	809 \ '\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	810 \ '\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	811 \ '\Vline 14: File2Function()'],
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	812 \ #{match: 'pattern'})
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	813
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	814 " 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	815 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	816 call RunDbgCmd(buf, 'backtrace', [
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	817 \ '\V>backtrace',
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	818 \ '\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	819 \ '\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	820 \ '\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	821 \ '\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	822 \ '\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	823 \ #{match: 'pattern'})
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	824
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	825
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	826 call StopVimInTerminal(buf)
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	827 call delete('Xtest1.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	828 call delete('Xtest2.vim')
6b2a5418cbc3 patch 8.2.1304: debug backtrace isn't tested much Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	829 endfunc
21687 83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	830
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	831 func Test_debug_backtrace_level()
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	832 CheckCWD
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	833 let lines =<< trim END
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	834 let s:file1_var = 'file1'
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	835 let g:global_var = 'global'
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	836
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	837 func s:File1Func( arg )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	838 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	839 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	840 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	841 source Xtest2.vim
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	842 endfunc
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	843
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	844 call s:File1Func( 'arg1' )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	845 END
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	846 call writefile(lines, 'Xtest1.vim')
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	847
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	848 let lines =<< trim END
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	849 let s:file2_var = 'file2'
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	850
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	851 func s:File2Func( arg )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	852 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	853 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	854 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	855 endfunc
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	856
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	857 call s:File2Func( 'arg2' )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	858 END
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	859 call writefile(lines, 'Xtest2.vim')
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	860
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	861 let file1 = getcwd() .. '/Xtest1.vim'
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	862 let file2 = getcwd() .. '/Xtest2.vim'
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	863
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	864 " 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	865 let buf = RunVimInTerminal(
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	866 \ '-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	867 \ #{ wait_for_ruler: 0 } )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	868
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	869 call CheckDbgOutput(buf, [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	870 \ 'Breakpoint in "' .. file1 .. '" line 1',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	871 \ '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	872 \ 'command line..script ' .. file1,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	873 \ '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	874 \ ])
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	875
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	876 " step throught the initial declarations
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	877 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	878 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	879 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	880 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	881 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	882
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	883 " 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	884 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	885 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	886 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	887 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	888 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	889 call RunDbgCmd(buf,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	890 \'echo global_var',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	891 \[ 'E121: Undefined variable: global_var' ] )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	892 call RunDbgCmd(buf,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	893 \'echo local_var',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	894 \[ 'E121: Undefined variable: local_var' ] )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	895 call RunDbgCmd(buf,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	896 \'echo l:local_var',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	897 \[ '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	898
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	899 " backtrace up
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	900 call RunDbgCmd(buf, 'backtrace', [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	901 \ '\V>backtrace',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	902 \ '\V 2 command line',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	903 \ '\V 1 script ' .. file1 .. '[11]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	904 \ '\V->0 function <SNR>\.\*_File1Func',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	905 \ '\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	906 \ ],
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	907 \ #{ match: 'pattern' } )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	908 call RunDbgCmd(buf, 'up', [ '>up' ] )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	909
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	910 call RunDbgCmd(buf, 'backtrace', [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	911 \ '\V>backtrace',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	912 \ '\V 2 command line',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	913 \ '\V->1 script ' .. file1 .. '[11]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	914 \ '\V 0 function <SNR>\.\*_File1Func',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	915 \ '\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	916 \ ],
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	917 \ #{ match: 'pattern' } )
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 " 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	920 " 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	921 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	922 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	923 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	924 " 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	925 call RunDbgCmd(buf,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	926 \'echo global_var',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	927 \[ 'E121: Undefined variable: global_var' ] )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	928 call RunDbgCmd(buf,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	929 \'echo local_var',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	930 \[ 'E121: Undefined variable: local_var' ] )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	931 call RunDbgCmd(buf,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	932 \'echo l:local_var',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	933 \[ '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	934
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	935
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	936 " 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	937 call RunDbgCmd(buf, 'step', [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	938 \ '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	939 call RunDbgCmd(buf, 'backtrace', [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	940 \ '\V>backtrace',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	941 \ '\V 2 command line',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	942 \ '\V 1 script ' .. file1 .. '[11]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	943 \ '\V->0 function <SNR>\.\*_File1Func',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	944 \ '\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	945 \ ],
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	946 \ #{ match: 'pattern' } )
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 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	949 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	950 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	951
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	952 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	953 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	954 call RunDbgCmd(buf, 'backtrace', [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	955 \ '\V>backtrace',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	956 \ '\V 3 command line',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	957 \ '\V 2 script ' .. file1 .. '[11]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	958 \ '\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	959 \ '\V->0 script ' .. file2,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	960 \ '\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	961 \ ],
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	962 \ #{ match: 'pattern' } )
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 " 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	965 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	966 call RunDbgCmd(buf,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	967 \ 'echo s:file1_var',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	968 \ [ '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	969 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	970 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	971 call RunDbgCmd(buf,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	972 \'echo local_var',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	973 \[ 'E121: Undefined variable: local_var' ] )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	974 call RunDbgCmd(buf,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	975 \'echo l:local_var',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	976 \[ '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	977 call RunDbgCmd(buf,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	978 \ 'echo s:file2_var',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	979 \ [ '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	980
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	981 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	982 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	983
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	984 " 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	985 call RunDbgCmd(buf, 'up')
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	986 call RunDbgCmd(buf, 'backtrace', [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	987 \ '\V>backtrace',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	988 \ '\V 3 command line',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	989 \ '\V 2 script ' .. file1 .. '[11]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	990 \ '\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	991 \ '\V 0 script ' .. file2,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	992 \ '\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	993 \ ],
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	994 \ #{ match: 'pattern' } )
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	995 " 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	996 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	997 call RunDbgCmd(buf,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	998 \ 'echo l:local_var',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	999 \ [ '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	1000
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	1001 call RunDbgCmd(buf, 'up')
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	1002 call RunDbgCmd(buf, 'backtrace', [
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	1003 \ '\V>backtrace',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	1004 \ '\V 3 command line',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	1005 \ '\V->2 script ' .. file1 .. '[11]',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	1006 \ '\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	1007 \ '\V 0 script ' .. file2,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	1008 \ '\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	1009 \ ],
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	1010 \ #{ match: 'pattern' } )
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 " 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	1013 call RunDbgCmd(buf,
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	1014 \ 'echo s:file1_var',
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	1015 \ [ '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	1016 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	1017
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	1018 call StopVimInTerminal(buf)
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	1019 call delete('Xtest1.vim')
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	1020 call delete('Xtest2.vim')
83b618c0315d patch 8.2.1393: insufficient testing for script debugging Bram Moolenaar <Bram@vim.org> parents: 21508 diff changeset	1021 endfunc
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21687 diff changeset	1022
21777 4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1023 " 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	1024 " 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	1025 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	1026 func F()
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1027 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	1028 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	1029 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	1030 endif
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1031 invalid_command
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1032 endfunc
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1033
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1034 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	1035 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	1036 try
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1037 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	1038 debuggreedy
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1039 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	1040 call F()
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1041 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	1042 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	1043 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	1044 endtry
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1045 0debuggreedy
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1046 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	1047 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	1048 breakdel *
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1049 delfunc F
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1050 endfunc
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1051
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1052 " 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	1053 " 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	1054 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	1055 func F()
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1056 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	1057 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	1058 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	1059 else
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1060 invalid_command
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1061 endif
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1062 invalid_command
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1063 endfunc
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1064
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1065 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	1066 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	1067 try
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1068 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	1069 debuggreedy
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1070 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	1071 call F()
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 call F()
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1101 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	1102 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	1103 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	1104 endtry
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1105 0debuggreedy
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(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	1107 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	1108 breakdel *
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1109 delfunc F
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1110 endfunc
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1111
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1112 " Test for setting a breakpoint on an :endtry where an exception is pending to
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1113 " be processed and then quit the script. This should generate an interrupt and
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1114 " the thrown exception should be ignored.
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1115 func Test_breakpt_endtry_intr()
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1116 func F()
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1117 try
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1118 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	1119 throw "abc"
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1120 endtry
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1121 invalid_command
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1122 endfunc
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1123
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1124 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	1125 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	1126 try
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1127 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	1128 let caught_abc = 0
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1129 debuggreedy
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1130 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	1131 call F()
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1132 catch /abc/
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1133 let caught_abc = 1
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1134 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	1135 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	1136 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	1137 endtry
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1138 0debuggreedy
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1139 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	1140 call assert_equal(0, caught_abc)
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1141 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	1142 breakdel *
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1143 delfunc F
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1144 endfunc
4279767da6e8 patch 8.2.1438: missing tests for interrupting script execution from debugger Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1145
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21687 diff changeset	1146 " vim: shiftwidth=2 sts=2 expandtab

Mercurial > vim

annotate src/testdir/test_debugger.vim @ 21777:4279767da6e8 v8.2.1438