view src/testdir/test_textobjects.in @ 7542:7df80e470272 v7.4.1072

commit https://github.com/vim/vim/commit/450919587d4566ce3d17e685e183d5c17d9c2a11 Author: Bram Moolenaar <Bram@vim.org> Date: Sat Jan 9 21:08:35 2016 +0100 patch 7.4.1072 Problem: Increment test is old style. Solution: Make the increment test a new style test. (Hirohito Higashi)
author Christian Brabandt <cb@256bit.org>
date Sat, 09 Jan 2016 21:15:04 +0100
parents cdddbd63bcfe
children
line wrap: on
line source

Tests for text-objects     vim: set ft=vim :

STARTTEST
:so small.vim
:if !has('textobjects') | e! test.ok | wq! test.out | endif
:set nocp viminfo+=nviminfo
:"
:function SelectionOut(data)
:  new
:  call setline(1, a:data)
:  call setreg('"', '')
:  normal! ggfrmavi)y
:  $put =getreg('\"')
:  call setreg('"', '')
:  normal! `afbmavi)y
:  $put =getreg('\"')
:  call setreg('"', '')
:  normal! `afgmavi)y
:  $put =getreg('\"')
:  %yank a
:  q!
:  $put =getreg('a')
:endfunction
:"
:$put ='# Test for vi) without cpo-M'
:set cpo-=M
:call SelectionOut('(red \(blue) green)')
:"
:$put ='# Test for vi) with cpo-M #1'
:set cpo+=M
:call SelectionOut('(red \(blue) green)')
:"
:$put ='# Test for vi) with cpo-M #2'
:set cpo+=M
:call SelectionOut('(red (blue\) green)')
:/^Results/,$w test.out
:qa!
ENDTEST

Results of text-objects