view src/testdir/test_textobjects.in @ 7404:fb61ce5915fc v7.4.1006

commit https://github.com/vim/vim/commit/96c664af27ec9535f2c3cd9b889faad3e9460ad6 Author: Bram Moolenaar <Bram@vim.org> Date: Thu Dec 31 16:21:52 2015 +0100 patch 7.4.1006 Problem: The fix in patch 7.3.192 is not tested. Solution: Add a test, one for each regexp engine. (Elias Diem)
author Christian Brabandt <cb@256bit.org>
date Thu, 31 Dec 2015 16:30: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