Mercurial > vim
view src/testdir/test83.in @ 8939:36cb3aff8c1c v7.4.1755
commit https://github.com/vim/vim/commit/517ffbee0d5b7b46320726faaa330b61f54e867c
Author: Bram Moolenaar <Bram@vim.org>
Date: Wed Apr 20 14:59:29 2016 +0200
patch 7.4.1755
Problem: When using getreg() on a non-existing register a NULL list is
returned. (Bjorn Linse)
Solution: Allocate an empty list. Add a test.
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Wed, 20 Apr 2016 15:00:06 +0200 |
parents | bc269cf15ccd |
children |
line wrap: on
line source
Tests for tag search with !_TAG_FILE_ENCODING. STARTTEST :so mbyte.vim :set enc=utf8 :if !has('iconv') || iconv("\x82\x60", "cp932", "utf-8") != "\uff21" : e! test.ok : w! test.out : qa! :endif : :/^text for tags1$/,/^text for tags1$/+1w! Xtags1.txt :/^text for tags2$/,/^text for tags2$/+1w! Xtags2.txt :/^text for tags3$/,/^text for tags3$/+1w! Xtags3.txt :/^tags1$/+1,/^tags1-end$/-1w! Xtags1 : ggdG: : :call setline('.', 'Results of test83') : :" case1: :new :set tags=Xtags1 :let v:errmsg = '' :tag abcdefghijklmnopqrs :if v:errmsg =~ 'E426:' || getline('.') != 'abcdefghijklmnopqrs' : close : put ='case1: failed' :else : close : put ='case1: ok' :endif : :" case2: :new :set tags=test83-tags2 :let v:errmsg = '' :tag /.BC :if v:errmsg =~ 'E426:' || getline('.') != 'ABC' : close : put ='case2: failed' :else : close : put ='case2: ok' :endif : :" case3: :new :set tags=test83-tags3 :let v:errmsg = '' :tag abc50 :if v:errmsg =~ 'E426:' || getline('.') != 'ABC' : close : put ='case3: failed' :else : close : put ='case3: ok' :endif :close : :wq! test.out ENDTEST text for tags1 abcdefghijklmnopqrs text for tags2 ABC text for tags3 ABC tags1 !_TAG_FILE_ENCODING utf-8 // abcdefghijklmnopqrs Xtags1.txt /abcdefghijklmnopqrs tags1-end