Mercurial > vim
view src/testdir/test_suspend.vim @ 22274:1634ca41e4d3 v8.2.1686
patch 8.2.1686: Vim9: "const!" not sufficiently tested
Commit: https://github.com/vim/vim/commit/71abe4828974af495602ffaff63cf643a16de84b
Author: Bram Moolenaar <Bram@vim.org>
Date: Mon Sep 14 22:28:30 2020 +0200
patch 8.2.1686: Vim9: "const!" not sufficiently tested
Problem: Vim9: "const!" not sufficiently tested.
Solution: Add a few more test cases. Fix type checking.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Mon, 14 Sep 2020 22:30:03 +0200 |
parents | 08940efa6b4e |
children | a916fca16d4b |
line wrap: on
line source
" Test :suspend source check.vim source term_util.vim func CheckSuspended(buf, fileExists) call WaitForAssert({-> assert_match('[$#] $', term_getline(a:buf, '.'))}) if a:fileExists call assert_equal(['foo'], readfile('Xfoo')) else " Without 'autowrite', buffer should not be written. call assert_equal(0, filereadable('Xfoo')) endif call term_sendkeys(a:buf, "fg\<CR>\<C-L>") call WaitForAssert({-> assert_equal(' 1 foo', term_getline(a:buf, '.'))}) endfunc func Test_suspend() CheckFeature terminal CheckExecutable /bin/sh let buf = term_start('/bin/sh') " Wait for shell prompt. call WaitForAssert({-> assert_match('[$#] $', term_getline(buf, '.'))}) call term_sendkeys(buf, v:progpath \ . " --clean -X" \ . " -c 'set nu'" \ . " -c 'call setline(1, \"foo\")'" \ . " Xfoo\<CR>") " Cursor in terminal buffer should be on first line in spawned vim. call WaitForAssert({-> assert_equal(' 1 foo', term_getline(buf, '.'))}) for suspend_cmd in [":suspend\<CR>", \ ":stop\<CR>", \ ":suspend!\<CR>", \ ":stop!\<CR>", \ "\<C-Z>"] " Suspend and wait for shell prompt. call term_sendkeys(buf, suspend_cmd) call CheckSuspended(buf, 0) endfor " Test that :suspend! with 'autowrite' writes content of buffers if modified. call term_sendkeys(buf, ":set autowrite\<CR>") call assert_equal(0, filereadable('Xfoo')) call term_sendkeys(buf, ":suspend\<CR>") " Wait for shell prompt. call CheckSuspended(buf, 1) " Quit gracefully to dump coverage information. call term_sendkeys(buf, ":qall!\<CR>") call TermWait(buf) " Wait until Vim actually exited and shell shows a prompt call WaitForAssert({-> assert_match('[$#] $', term_getline(buf, '.'))}) call StopShellInTerminal(buf) exe buf . 'bwipe!' call delete('Xfoo') endfunc " vim: shiftwidth=2 sts=2 expandtab