mirror of
https://github.com/neovim/neovim.git
synced 2025-09-18 17:28:23 +00:00
e03b43bd07
Let build systems define TEST_SKIP_FRAGILE to skip tests that are known to be resource-intensive (unreliable on slow systems). References https://github.com/neovim/neovim/pull/5488#issuecomment-265622113
63 lines
1.8 KiB
Lua
63 lines
1.8 KiB
Lua
local helpers = require('test.functional.helpers')(after_each)
|
|
local Screen = require('test.functional.ui.screen')
|
|
local clear, feed, source = helpers.clear, helpers.feed, helpers.source
|
|
local execute = helpers.execute
|
|
|
|
if helpers.pending_win32(pending) then return end
|
|
|
|
describe("CTRL-C (mapped)", function()
|
|
before_each(function()
|
|
clear()
|
|
end)
|
|
|
|
it("interrupts :global", function()
|
|
if helpers.skip_fragile(pending,
|
|
(os.getenv("TRAVIS") and os.getenv("CLANG_SANITIZER") == "ASAN_UBSAN"))
|
|
then
|
|
return
|
|
end
|
|
|
|
source([[
|
|
set nomore nohlsearch undolevels=-1
|
|
nnoremap <C-C> <NOP>
|
|
]])
|
|
|
|
execute("silent edit! test/functional/fixtures/bigfile.txt")
|
|
local screen = Screen.new(52, 6)
|
|
screen:attach()
|
|
screen:set_default_attr_ids({
|
|
[0] = {foreground = Screen.colors.White,
|
|
background = Screen.colors.Red},
|
|
[1] = {bold = true,
|
|
foreground = Screen.colors.SeaGreen}
|
|
})
|
|
|
|
screen:expect([[
|
|
^0000;<control>;Cc;0;BN;;;;;N;NULL;;;; |
|
|
0001;<control>;Cc;0;BN;;;;;N;START OF HEADING;;;; |
|
|
0002;<control>;Cc;0;BN;;;;;N;START OF TEXT;;;; |
|
|
0003;<control>;Cc;0;BN;;;;;N;END OF TEXT;;;; |
|
|
0004;<control>;Cc;0;BN;;;;;N;END OF TRANSMISSION;;;;|
|
|
|
|
|
]])
|
|
|
|
local function test_ctrl_c(ms)
|
|
feed(":global/^/p<CR>")
|
|
helpers.sleep(ms)
|
|
feed("<C-C>")
|
|
screen:expect([[Interrupt]], nil, nil, nil, true)
|
|
end
|
|
|
|
-- The test is time-sensitive. Try different sleep values.
|
|
local ms_values = {1, 10, 100}
|
|
for i, ms in ipairs(ms_values) do
|
|
if i < #ms_values then
|
|
local status, _ = pcall(test_ctrl_c, ms)
|
|
if status then break end
|
|
else -- Call the last attempt directly.
|
|
test_ctrl_c(ms)
|
|
end
|
|
end
|
|
end)
|
|
end)
|