Mercurial > vim
view src/testdir/test_source_utf8.vim @ 12992:5532b5176870 v8.0.1372
patch 8.0.1372: profile log may be truncated halfway a character
commit https://github.com/vim/vim/commit/ac112f01a6930c9d15cf0360b657373699916bfd
Author: Bram Moolenaar <Bram@vim.org>
Date: Tue Dec 5 16:46:28 2017 +0100
patch 8.0.1372: profile log may be truncated halfway a character
Problem: Profile log may be truncated halfway a character.
Solution: Find the start of the character. (Ozaki Kiichi, closes https://github.com/vim/vim/issues/2385)
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Tue, 05 Dec 2017 17:00:07 +0100 |
parents | aa658b33f25a |
children | 2dcaa860e3fc |
line wrap: on
line source
" Test the :source! command if !has('multi_byte') finish endif func Test_source_utf8() " check that sourcing a script with 0x80 as second byte works new call setline(1, [':%s/àx/--à1234--/g', ':%s/Àx/--À1234--/g']) write! Xscript bwipe! new call setline(1, [' àx ', ' Àx ']) source! Xscript | echo call assert_equal(' --à1234-- ', getline(1)) call assert_equal(' --À1234-- ', getline(2)) bwipe! call delete('Xscript') endfunc func Test_source_latin() " check that sourcing a latin1 script with a 0xc0 byte works new call setline(1, ["call feedkeys('r')", "call feedkeys('\xc0', 'xt')"]) write! Xscript bwipe! new call setline(1, ['xxx']) source Xscript call assert_equal("\u00c0xx", getline(1)) bwipe! call delete('Xscript') endfunc " Test for sourcing a file with CTRL-V's at the end of the line func Test_source_ctrl_v() call writefile(['map __1 afirst', \ 'map __2 asecond', \ 'map __3 athird', \ 'map __4 afourth', \ 'map __5 afifth', \ "map __1 asd\<C-V>", \ "map __2 asd\<C-V>\<C-V>", \ "map __3 asd\<C-V>\<C-V>", \ "map __4 asd\<C-V>\<C-V>\<C-V>", \ "map __5 asd\<C-V>\<C-V>\<C-V>", \ ], 'Xtestfile') source Xtestfile enew! exe "normal __1\<Esc>\<Esc>__2\<Esc>__3\<Esc>\<Esc>__4\<Esc>__5\<Esc>" exe "%s/\<C-J>/0/g" call assert_equal(['sd', \ "map __2 asd\<Esc>secondsd\<Esc>sd0map __5 asd0fifth"], \ getline(1, 2)) enew! call delete('Xtestfile') unmap __1 unmap __2 unmap __3 unmap __4 unmap __5 endfunc