| Bram Moolenaar | c35b0fb | 2014-05-29 11:47:40 +0200 | [diff] [blame] | 1 | Tests for adjusting window and contents vim: set ft=vim : |
| 2 | |
| 3 | STARTTEST |
| 4 | :so small.vim |
| 5 | :new |
| 6 | :call setline(1, range(1,256)) |
| 7 | :let r=[] |
| 8 | :func! GetScreenStr(row) |
| 9 | : let str = "" |
| 10 | : for c in range(1,3) |
| 11 | : let str .= nr2char(screenchar(a:row, c)) |
| 12 | : endfor |
| 13 | : return str |
| 14 | :endfunc |
| 15 | : |
| 16 | :exe ":norm! \<C-W>t\<C-W>=1Gzt\<C-W>w\<C-W>+" |
| 17 | :let s3=GetScreenStr(1) |
| 18 | :wincmd p |
| 19 | :call add(r, [line("w0"), s3]) |
| 20 | : |
| 21 | :exe ":norm! \<C-W>t\<C-W>=50Gzt\<C-W>w\<C-W>+" |
| 22 | :let s3=GetScreenStr(1) |
| 23 | :wincmd p |
| 24 | :call add(r, [line("w0"), s3]) |
| 25 | : |
| 26 | :exe ":norm! \<C-W>t\<C-W>=59Gzt\<C-W>w\<C-W>+" |
| 27 | :let s3=GetScreenStr(1) |
| 28 | ::wincmd p |
| 29 | :call add(r, [line("w0"), s3]) |
| 30 | : |
| 31 | :bwipeout! |
| 32 | :$put=r |
| 33 | :call garbagecollect(1) |
| 34 | :" |
| 35 | :/^start:/,$wq! test.out |
| 36 | ENDTEST |
| 37 | |
| 38 | start: |