patch 9.0.1791: No tests for the termdebug plugin
Commit:
https://github.com/vim/vim/commit/58f39d89a8adff51ab04893d1fd28e3767979f9f
Author: Yegappan Lakshmanan <yegap...@yahoo.com>
Date: Sun Aug 27 11:14:44 2023 +0200
patch 9.0.1791: No tests for the termdebug plugin
Problem: No tests for the termdebug plugin
Solution: Add some simple tests for the termdebug plugin
closes: #12927
Signed-off-by: Christian Brabandt <c...@256bit.org>
Co-authored-by: Yegappan Lakshmanan <yegap...@yahoo.com>
diff --git a/.github/workflows/ci.yml b/.github/workflows/ci.yml
index 98bff17d4..459d5932d 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 fbdc3c7ee..e2e29f12d 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 000000000..16d0004cf
--- /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, 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
--
--
You received this message from the "vim_dev" maillist.
Do not top-post! Type your reply below the text you are replying to.
For more information, visit http://www.vim.org/maillist.php
---
You received this message because you are subscribed to the Google Groups
"vim_dev" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to vim_dev+unsubscr...@googlegroups.com.
To view this discussion on the web visit
https://groups.google.com/d/msgid/vim_dev/E1qaC5u-002uvJ-Ai%40256bit.org.
