Mercurial > vim
view src/testdir/test_increment_dbcs.vim @ 9345:96a248eddf5f v7.4.1954
commit https://github.com/vim/vim/commit/d388d2ac8bf8c770bf97dc406e99a20ba5104855
Author: Bram Moolenaar <Bram@vim.org>
Date: Sun Jun 26 16:24:20 2016 +0200
patch 7.4.1954
Problem: No test for what 7.4.1948 fixes.
Solution: Add a test. (Hirohito Higashi, closes https://github.com/vim/vim/issues/880)
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Sun, 26 Jun 2016 16:30:09 +0200 |
parents | |
children | 3ee84d270ea7 |
line wrap: on
line source
" Tests for using Ctrl-A/Ctrl-X using DBCS. if !has('multi_byte') finish endif set encoding=cp932 scriptencoding cp932 func SetUp() new set nrformats& endfunc func TearDown() bwipe! endfunc func Test_increment_dbcs_1() set nrformats+=alpha call setline(1, ["ŽR1"]) exec "norm! 0\<C-A>" call assert_equal(["ŽR2"], getline(1, '$')) call assert_equal([0, 1, 3, 0], getpos('.')) call setline(1, ["‚`‚a‚b0xDE‚e"]) exec "norm! 0\<C-X>" call assert_equal(["‚`‚a‚b0xDD‚e"], getline(1, '$')) call assert_equal([0, 1, 10, 0], getpos('.')) endfunc " vim: shiftwidth=2 expandtab