view src/testdir/test_textobjects.in @ 9483:d735119cc327 v7.4.2022

commit https://github.com/vim/vim/commit/25065ec375a8a55462f6c07c76dc1a72a770ac19 Author: Bram Moolenaar <Bram@vim.org> Date: Sun Jul 10 19:22:53 2016 +0200 patch 7.4.2022 Problem: Warnings from 64 bit compiler. Solution: Add type casts. (Mike Williams)
author Christian Brabandt <cb@256bit.org>
date Sun, 10 Jul 2016 19:30: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