view src/testdir/test_textobjects.in @ 9438:7897b1e4f3e7 v7.4.2000

commit https://github.com/vim/vim/commit/245a7cb6d33e556415c9fcaa874b784a6d8f0ef3 Author: Bram Moolenaar <Bram@vim.org> Date: Fri Jul 8 10:53:12 2016 +0200 patch 7.4.2000 Problem: Evalcmd test fails. Solution: Add missing piece.
author Christian Brabandt <cb@256bit.org>
date Fri, 08 Jul 2016 11:00:06 +0200
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