xref: /vim-8.2.3635/src/testdir/test_suspend.vim (revision eae1b91f)
1" Test :suspend
2
3source shared.vim
4
5func CheckSuspended(buf, fileExists)
6  call WaitForAssert({-> assert_match('[$#] $', term_getline(a:buf, '.'))})
7
8  if a:fileExists
9    call assert_equal(['foo'], readfile('Xfoo'))
10  else
11    " Without 'autowrite', buffer should not be written.
12    call assert_equal(0, filereadable('Xfoo'))
13  endif
14
15  call term_sendkeys(a:buf, "fg\<CR>\<C-L>")
16  call WaitForAssert({-> assert_equal('  1 foo', term_getline(a:buf, '.'))})
17endfunc
18
19func Test_suspend()
20  if !has('terminal') || !executable('/bin/sh')
21    return
22  endif
23
24  let buf = term_start('/bin/sh')
25  " Wait for shell prompt.
26  call WaitForAssert({-> assert_match('[$#] $', term_getline(buf, '.'))})
27
28  call term_sendkeys(buf, v:progpath
29        \               . " --clean -X"
30        \               . " -c 'set nu'"
31        \               . " -c 'call setline(1, \"foo\")'"
32        \               . " Xfoo\<CR>")
33  " Cursor in terminal buffer should be on first line in spawned vim.
34  call WaitForAssert({-> assert_equal('  1 foo', term_getline(buf, '.'))})
35
36  for suspend_cmd in [":suspend\<CR>",
37        \             ":stop\<CR>",
38        \             ":suspend!\<CR>",
39        \             ":stop!\<CR>",
40        \             "\<C-Z>"]
41    " Suspend and wait for shell prompt.
42    call term_sendkeys(buf, suspend_cmd)
43    call CheckSuspended(buf, 0)
44  endfor
45
46  " Test that :suspend! with 'autowrite' writes content of buffers if modified.
47  call term_sendkeys(buf, ":set autowrite\<CR>")
48  call assert_equal(0, filereadable('Xfoo'))
49  call term_sendkeys(buf, ":suspend\<CR>")
50  " Wait for shell prompt.
51  call CheckSuspended(buf, 1)
52
53  " Quit gracefully to dump coverage information.
54  call term_sendkeys(buf, ":qall!\<CR>")
55  call term_wait(buf)
56  call Stop_shell_in_terminal(buf)
57
58  exe buf . 'bwipe!'
59  call delete('Xfoo')
60endfunc
61