Mercurial > vim
view src/testdir/test_textobjects.in @ 8885:54a380c74547 v7.4.1729
commit https://github.com/vim/vim/commit/6244a0fc29163ba1c734f92b55a89e01e6cf2a67
Author: Bram Moolenaar <Bram@vim.org>
Date: Thu Apr 14 14:09:25 2016 +0200
patch 7.4.1729
Problem: The Perl interface cannot use 'print' operator for writing
directly in standard IO.
Solution: Add a minimal implementation of PerlIO Layer feature and try to
use it for STDOUT/STDERR. (Damien)
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Thu, 14 Apr 2016 14:15:05 +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