annotate src/testdir/test56.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 |
b63792dadc23 |
| children |
|
| rev |
line source |
|
271
|
1 Test for script-local function. vim: set ft=vim :
|
|
|
2
|
|
|
3 STARTTEST
|
|
|
4 :so small.vim
|
|
|
5 :"
|
|
959
|
6 :set nocp viminfo+=nviminfo
|
|
271
|
7 :/^start:/+1,/^end:/-1w! Xtest.vim
|
|
|
8 :source Xtest.vim
|
|
|
9 _x
|
|
|
10 :$-1,$wq! test.out
|
|
|
11 ENDTEST
|
|
|
12
|
|
|
13 start:
|
|
|
14 fun <SID>DoLast()
|
|
|
15 call append(line('$'), "last line")
|
|
|
16 endfun
|
|
|
17 fun s:DoNothing()
|
|
|
18 call append(line('$'), "nothing line")
|
|
|
19 endfun
|
|
1405
|
20 nnoremap <buffer> _x :call <SID>DoNothing()<bar>call <SID>DoLast()<bar>delfunc <SID>DoNothing<bar>delfunc <SID>DoLast<cr>
|
|
271
|
21 end:
|
