diff options
-rw-r--r-- | .github/workflows/ci.yml | 1 | ||||
-rw-r--r-- | src/testdir/Make_all.mak | 2 | ||||
-rw-r--r-- | src/testdir/test_termdebug.vim | 91 |
3 files changed, 94 insertions, 0 deletions
diff --git a/.github/workflows/ci.yml b/.github/workflows/ci.yml index 98bff17d42..459d5932d7 100644 --- a/.github/workflows/ci.yml +++ b/.github/workflows/ci.yml @@ -92,6 +92,7 @@ jobs: if ${{ matrix.features == 'huge' }}; then PKGS+=( \ autoconf \ + gdb \ lcov \ libcanberra-dev \ libperl-dev \ diff --git a/src/testdir/Make_all.mak b/src/testdir/Make_all.mak index fbdc3c7ee8..e2e29f12d2 100644 --- a/src/testdir/Make_all.mak +++ b/src/testdir/Make_all.mak @@ -290,6 +290,7 @@ NEW_TESTS = \ test_taglist \ test_tcl \ test_termcodes \ + test_termdebug \ test_termencoding \ test_terminal \ test_terminal2 \ @@ -523,6 +524,7 @@ NEW_TESTS_RES = \ test_taglist.res \ test_tcl.res \ test_termcodes.res \ + test_termdebug.res \ test_termencoding.res \ test_terminal.res \ test_terminal2.res \ diff --git a/src/testdir/test_termdebug.vim b/src/testdir/test_termdebug.vim new file mode 100644 index 0000000000..16d0004cfe --- /dev/null +++ b/src/testdir/test_termdebug.vim @@ -0,0 +1,91 @@ +" Test for the termdebug plugin + +source check.vim + +CheckUnix +CheckFeature terminal +CheckExecutable gdb +CheckExecutable gcc + +let g:GDB = exepath('gdb') +if g:GDB->empty() + throw 'Skpped: gdb is not found in $PATH' +endif + +let g:GCC = exepath('gcc') +if g:GCC->empty() + throw 'Skpped: gcc is not found in $PATH' +endif + +packadd termdebug + +func Test_termdebug_basic() + let lines =<< trim END + #include <stdio.h> + #include <stdlib.h> + + int isprime(int n) + { + if (n <= 1) + return 0; + + for (int i = 2; i <= n / 2; i++) + if (n % i == 0) + return 0; + + return 1; + } + + int main(int argc, char *argv[]) + { + int n = 7; + + printf("%d is %s prime\n", n, isprime(n) ? "a" : "not a"); + + return 0; + } + END + call writefile(lines, 'XTD_basic.c', 'D') + call system($'{g:GCC} -g -o XTD_basic XTD_basic.c') + + edit XTD_basic.c + Termdebug ./XTD_basic + call assert_equal(3, winnr('$')) + let gdb_buf = winbufnr(1) + wincmd b + Break 9 + call term_wait(gdb_buf) + redraw! + call assert_equal([ + \ {'lnum': 9, 'id': 1014, 'name': 'debugBreakpoint1.0', + \ 'priority': 110, 'group': 'TermDebug'}], + \ sign_getplaced('', #{group: 'TermDebug'})[0].signs) + Run + call term_wait(gdb_buf, 200) + redraw! + call assert_equal([ + \ {'lnum': 9, 'id': 12, 'name': 'debugPC', 'priority': 110, + \ 'group': 'TermDebug'}, + \ {'lnum': 9, 'id': 1014, 'name': 'debugBreakpoint1.0', + \ 'priority': 110, 'group': 'TermDebug'}], + \ sign_getplaced('', #{group: 'TermDebug'})[0].signs) + Finish + call term_wait(gdb_buf) + redraw! + call assert_equal([ + \ {'lnum': 9, 'id': 1014, 'name': 'debugBreakpoint1.0', + \ 'priority': 110, 'group': 'TermDebug'}, + \ {'lnum': 20, 'id': 12, 'name': 'debugPC', + \ 'priority': 110, 'group': 'TermDebug'}], + \ sign_getplaced('', #{group: 'TermDebug'})[0].signs) + Continue + wincmd t + quit! + redraw! + call assert_equal([], sign_getplaced('', #{group: 'TermDebug'})[0].signs) + + call delete('XTD_basic') + %bw! +endfunc + +" vim: shiftwidth=2 sts=2 expandtab |