mirror of
https://github.com/neovim/neovim.git
synced 2025-10-26 12:27:24 +00:00
vim-patch:9.1.0984: exception handling can be improved
Problem: exception handling can be improved
Solution: add v:stacktrace and getstacktrace()
closes: vim/vim#16360
663d18d610
Co-authored-by: ichizok <gclient.gaap@gmail.com>
Co-authored-by: Naruhiko Nishino <naru123456789@gmail.com>
This commit is contained in:
107
test/old/testdir/test_stacktrace.vim
Normal file
107
test/old/testdir/test_stacktrace.vim
Normal file
@@ -0,0 +1,107 @@
|
||||
" Test for getstacktrace() and v:stacktrace
|
||||
|
||||
let s:thisfile = expand('%:p')
|
||||
let s:testdir = s:thisfile->fnamemodify(':h')
|
||||
|
||||
func Filepath(name)
|
||||
return s:testdir .. '/' .. a:name
|
||||
endfunc
|
||||
|
||||
func AssertStacktrace(expect, actual)
|
||||
call assert_equal(#{lnum: 581, filepath: Filepath('runtest.vim')}, a:actual[0])
|
||||
call assert_equal(a:expect, a:actual[-len(a:expect):])
|
||||
endfunc
|
||||
|
||||
func Test_getstacktrace()
|
||||
let g:stacktrace = []
|
||||
let lines1 =<< trim [SCRIPT]
|
||||
" Xscript1
|
||||
source Xscript2
|
||||
func Xfunc1()
|
||||
" Xfunc1
|
||||
call Xfunc2()
|
||||
endfunc
|
||||
[SCRIPT]
|
||||
let lines2 =<< trim [SCRIPT]
|
||||
" Xscript2
|
||||
func Xfunc2()
|
||||
" Xfunc2
|
||||
let g:stacktrace = getstacktrace()
|
||||
endfunc
|
||||
[SCRIPT]
|
||||
call writefile(lines1, 'Xscript1', 'D')
|
||||
call writefile(lines2, 'Xscript2', 'D')
|
||||
source Xscript1
|
||||
call Xfunc1()
|
||||
call AssertStacktrace([
|
||||
\ #{funcref: funcref('Test_getstacktrace'), lnum: 35, filepath: s:thisfile},
|
||||
\ #{funcref: funcref('Xfunc1'), lnum: 5, filepath: Filepath('Xscript1')},
|
||||
\ #{funcref: funcref('Xfunc2'), lnum: 4, filepath: Filepath('Xscript2')},
|
||||
\ ], g:stacktrace)
|
||||
unlet g:stacktrace
|
||||
endfunc
|
||||
|
||||
func Test_getstacktrace_event()
|
||||
let g:stacktrace = []
|
||||
let lines1 =<< trim [SCRIPT]
|
||||
" Xscript1
|
||||
func Xfunc()
|
||||
" Xfunc
|
||||
let g:stacktrace = getstacktrace()
|
||||
endfunc
|
||||
augroup test_stacktrace
|
||||
autocmd SourcePre * call Xfunc()
|
||||
augroup END
|
||||
[SCRIPT]
|
||||
let lines2 =<< trim [SCRIPT]
|
||||
" Xscript2
|
||||
[SCRIPT]
|
||||
call writefile(lines1, 'Xscript1', 'D')
|
||||
call writefile(lines2, 'Xscript2', 'D')
|
||||
source Xscript1
|
||||
source Xscript2
|
||||
call AssertStacktrace([
|
||||
\ #{funcref: funcref('Test_getstacktrace_event'), lnum: 62, filepath: s:thisfile},
|
||||
\ #{event: 'SourcePre Autocommands for "*"', lnum: 7, filepath: Filepath('Xscript1')},
|
||||
\ #{funcref: funcref('Xfunc'), lnum: 4, filepath: Filepath('Xscript1')},
|
||||
\ ], g:stacktrace)
|
||||
augroup test_stacktrace
|
||||
autocmd!
|
||||
augroup END
|
||||
unlet g:stacktrace
|
||||
endfunc
|
||||
|
||||
func Test_vstacktrace()
|
||||
let lines1 =<< trim [SCRIPT]
|
||||
" Xscript1
|
||||
source Xscript2
|
||||
func Xfunc1()
|
||||
" Xfunc1
|
||||
call Xfunc2()
|
||||
endfunc
|
||||
[SCRIPT]
|
||||
let lines2 =<< trim [SCRIPT]
|
||||
" Xscript2
|
||||
func Xfunc2()
|
||||
" Xfunc2
|
||||
throw 'Exception from Xfunc2'
|
||||
endfunc
|
||||
[SCRIPT]
|
||||
call writefile(lines1, 'Xscript1', 'D')
|
||||
call writefile(lines2, 'Xscript2', 'D')
|
||||
source Xscript1
|
||||
call assert_equal([], v:stacktrace)
|
||||
try
|
||||
call Xfunc1()
|
||||
catch
|
||||
let stacktrace = v:stacktrace
|
||||
endtry
|
||||
call assert_equal([], v:stacktrace)
|
||||
call AssertStacktrace([
|
||||
\ #{funcref: funcref('Test_vstacktrace'), lnum: 95, filepath: s:thisfile},
|
||||
\ #{funcref: funcref('Xfunc1'), lnum: 5, filepath: Filepath('Xscript1')},
|
||||
\ #{funcref: funcref('Xfunc2'), lnum: 4, filepath: Filepath('Xscript2')},
|
||||
\ ], stacktrace)
|
||||
endfunc
|
||||
|
||||
" vim: shiftwidth=2 sts=2 expandtab
|
||||
Reference in New Issue
Block a user