| Tests for maparg(). |
| Also test utf8 map with a 0x80 byte. |
| |
| STARTTEST |
| :so small.vim |
| :so mbyte.vim |
| :set cpo-=< |
| :set encoding=utf8 |
| :" Test maparg() with a string result |
| :map foo<C-V> is<F4>foo |
| :vnoremap <script> <buffer> <expr> <silent> bar isbar |
| :call append('$', maparg('foo<C-V>')) |
| :call append('$', string(maparg('foo<C-V>', '', 0, 1))) |
| :call append('$', string(maparg('bar', '', 0, 1))) |
| :map <buffer> <nowait> foo bar |
| :call append('$', string(maparg('foo', '', 0, 1))) |
| :" |
| :map abc x<char-114>x |
| :call append('$', maparg('abc')) |
| :map abc y<S-char-114>y |
| :call append('$', maparg('abc')) |
| :" |
| Go:" |
| :" Outside of the range, minimum |
| :inoremap <Char-0x1040> a |
| :execute "normal a\u1040\<Esc>" |
| :" Inside of the range, minimum |
| :inoremap <Char-0x103f> b |
| :execute "normal a\u103f\<Esc>" |
| :" Inside of the range, maximum |
| :inoremap <Char-0xf03f> c |
| :execute "normal a\uf03f\<Esc>" |
| :" Outside of the range, maximum |
| :inoremap <Char-0xf040> d |
| :execute "normal a\uf040\<Esc>" |
| :" |
| :/^eof/+1,$w! test.out |
| :qa! |
| ENDTEST |
| |
| eof |