Merge PR #1879 'Migrate legacy test 107'

src/nvim/testdir/test107.in

@@ -1,38 +0,0 @@
-Tests for adjusting window and contents     vim: set ft=vim :
-
-STARTTEST
-:so small.vim
-:new
-:call setline(1, range(1,256))
-:let r=[]
-:func! GetScreenStr(row)
-:   let str = ""
-:   for c in range(1,3)
-:       let str .= nr2char(screenchar(a:row, c))
-:   endfor
-:   return str
-:endfunc
-:
-:exe ":norm! \<C-W>t\<C-W>=1Gzt\<C-W>w\<C-W>+"
-:let s3=GetScreenStr(1)
-:wincmd p
-:call add(r, [line("w0"), s3])
-:
-:exe ":norm! \<C-W>t\<C-W>=50Gzt\<C-W>w\<C-W>+"
-:let s3=GetScreenStr(1)
-:wincmd p
-:call add(r, [line("w0"), s3])
-:
-:exe ":norm! \<C-W>t\<C-W>=59Gzt\<C-W>w\<C-W>+"
-:let s3=GetScreenStr(1)
-::wincmd p
-:call add(r, [line("w0"), s3])
-:
-:bwipeout!
-:$put=r
-:call garbagecollect(1)
-:"
-:/^start:/,$wq! test.out
-ENDTEST
-
-start:

src/nvim/testdir/test107.ok

@@ -1,4 +0,0 @@
-start:
-[1, '1  ']
-[50, '50 ']
-[59, '59 ']

test/functional/legacy/107_adjust_window_and_contents_spec.lua

@@ -0,0 +1,59 @@
+-- Tests for adjusting window and contents
+
+local helpers = require('test.functional.helpers')
+local Screen = require('test.functional.ui.screen')
+local feed, insert, source = helpers.feed, helpers.insert, helpers.source
+local clear, execute, expect = helpers.clear, helpers.execute, helpers.expect
+
+describe('107', function()
+  setup(clear)
+
+  it('is working', function()
+    local screen = Screen.new()
+    screen:attach()
+
+    insert('start:')
+    execute('new')
+    execute('call setline(1, range(1,256))')
+    execute('let r=[]')
+    execute('func! GetScreenStr(row)')
+    execute('   let str = ""')
+    execute('   for c in range(1,3)')
+    execute('       let str .= nr2char(screenchar(a:row, c))')
+    execute('   endfor')
+    execute('   return str')
+    execute('endfunc')
+    execute([[exe ":norm! \<C-W>t\<C-W>=1Gzt\<C-W>w\<C-W>+"]])
+    execute('let s3=GetScreenStr(1)')
+    execute('wincmd p')
+    execute('call add(r, [line("w0"), s3])')
+    execute([[exe ":norm! \<C-W>t\<C-W>=50Gzt\<C-W>w\<C-W>+"]])
+    execute('let s3=GetScreenStr(1)')
+    execute('wincmd p')
+    execute('call add(r, [line("w0"), s3])')
+    execute([[exe ":norm! \<C-W>t\<C-W>=59Gzt\<C-W>w\<C-W>+"]])
+    execute('let s3=GetScreenStr(1)')
+    execute(':wincmd p')
+    execute('call add(r, [line("w0"), s3])')
+    execute('bwipeout!')
+    execute('$put=r')
+    execute('call garbagecollect(1)')
+
+    screen:expect([[
+      start:                                               |
+      [1, '1  ']                                           |
+      [50, '50 ']                                          |
+      ^59, '59 ']                                          |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      :call garbagecollect(1)                              |
+    ]])
+  end)
+end)