diff src/testdir/test_hlsearch.vim @ 32669:448aef880252

normalize line endings
author Christian Brabandt <cb@256bit.org>
date Mon, 26 Jun 2023 09:54:34 +0200
parents 57e589d18e7d
children 695b50472e85
line wrap: on
line diff
--- a/src/testdir/test_hlsearch.vim
+++ b/src/testdir/test_hlsearch.vim
@@ -1,113 +1,113 @@
-" Test for v:hlsearch
-
-source check.vim
-source screendump.vim
-
-func Test_hlsearch()
-  new
-  call setline(1, repeat(['aaa'], 10))
-  set hlsearch nolazyredraw
-  " redraw is needed to make hlsearch highlight the matches
-  exe "normal! /aaa\<CR>" | redraw
-  let r1 = screenattr(1, 1)
-  nohlsearch | redraw
-  call assert_notequal(r1, screenattr(1,1))
-  let v:hlsearch=1 | redraw
-  call assert_equal(r1, screenattr(1,1))
-  let v:hlsearch=0 | redraw
-  call assert_notequal(r1, screenattr(1,1))
-  set hlsearch | redraw
-  call assert_equal(r1, screenattr(1,1))
-  let v:hlsearch=0 | redraw
-  call assert_notequal(r1, screenattr(1,1))
-  exe "normal! n" | redraw
-  call assert_equal(r1, screenattr(1,1))
-  let v:hlsearch=0 | redraw
-  call assert_notequal(r1, screenattr(1,1))
-  exe "normal! /\<CR>" | redraw
-  call assert_equal(r1, screenattr(1,1))
-  set nohls
-  exe "normal! /\<CR>" | redraw
-  call assert_notequal(r1, screenattr(1,1))
-  call assert_fails('let v:hlsearch=[]', 'E745:')
-  call garbagecollect(1)
-  call getchar(1)
-  enew!
-endfunc
-
-func Test_hlsearch_hangs()
-  CheckFunction reltimefloat
-
-  " So, it turns out that Windows 7 implements TimerQueue timers differently
-  " and they can expire *before* the requested time has elapsed. So allow for
-  " the timeout occurring after 80 ms (5 * 16 (the typical clock tick)).
-  if has("win32")
-    let min_timeout = 0.08
-  else
-    let min_timeout = 0.1
-  endif
-
-  " This pattern takes a long time to match, it should timeout.
-  new
-  call setline(1, ['aaa', repeat('abc ', 1000), 'ccc'])
-  let start = reltime()
-  set hlsearch nolazyredraw redrawtime=101
-  let @/ = '\%#=1a*.*X\@<=b*'
-  redraw
-  let elapsed = reltimefloat(reltime(start))
-  call assert_inrange(min_timeout, 1.0, elapsed)
-  set nohlsearch redrawtime&
-  bwipe!
-endfunc
-
-func Test_hlsearch_eol_highlight()
-  new
-  call append(1, repeat([''], 9))
-  set hlsearch nolazyredraw
-  exe "normal! /$\<CR>" | redraw
-  let attr = screenattr(1, 1)
-  for row in range(2, 10)
-    call assert_equal(attr, screenattr(row, 1), 'in line ' . row)
-  endfor
-  set nohlsearch
-  bwipe!
-endfunc
-
-func Test_hlsearch_Ctrl_R()
-  CheckRunVimInTerminal
-
-  let lines =<< trim END
-      set incsearch hlsearch
-      let @" = "text"
-      put
-  END
-  call writefile(lines, 'XhlsearchCtrlR', 'D')
-  let buf = RunVimInTerminal('-S XhlsearchCtrlR', #{rows: 6, cols: 60})
-
-  call term_sendkeys(buf, "/\<C-R>\<C-R>\"")
-  call VerifyScreenDump(buf, 'Test_hlsearch_ctrlr_1', {})
-
-  call term_sendkeys(buf, "\<Esc>")
-  call StopVimInTerminal(buf)
-endfunc
-
-func Test_hlsearch_clipboard()
-  CheckRunVimInTerminal
-  CheckFeature clipboard_working
-
-  let lines =<< trim END
-      set incsearch hlsearch
-      let @* = "text"
-      put *
-  END
-  call writefile(lines, 'XhlsearchClipboard', 'D')
-  let buf = RunVimInTerminal('-S XhlsearchClipboard', #{rows: 6, cols: 60})
-
-  call term_sendkeys(buf, "/\<C-R>*")
-  call VerifyScreenDump(buf, 'Test_hlsearch_ctrlr_1', {})
-
-  call term_sendkeys(buf, "\<Esc>")
-  call StopVimInTerminal(buf)
-endfunc
-
-" vim: shiftwidth=2 sts=2 expandtab
+" Test for v:hlsearch
+
+source check.vim
+source screendump.vim
+
+func Test_hlsearch()
+  new
+  call setline(1, repeat(['aaa'], 10))
+  set hlsearch nolazyredraw
+  " redraw is needed to make hlsearch highlight the matches
+  exe "normal! /aaa\<CR>" | redraw
+  let r1 = screenattr(1, 1)
+  nohlsearch | redraw
+  call assert_notequal(r1, screenattr(1,1))
+  let v:hlsearch=1 | redraw
+  call assert_equal(r1, screenattr(1,1))
+  let v:hlsearch=0 | redraw
+  call assert_notequal(r1, screenattr(1,1))
+  set hlsearch | redraw
+  call assert_equal(r1, screenattr(1,1))
+  let v:hlsearch=0 | redraw
+  call assert_notequal(r1, screenattr(1,1))
+  exe "normal! n" | redraw
+  call assert_equal(r1, screenattr(1,1))
+  let v:hlsearch=0 | redraw
+  call assert_notequal(r1, screenattr(1,1))
+  exe "normal! /\<CR>" | redraw
+  call assert_equal(r1, screenattr(1,1))
+  set nohls
+  exe "normal! /\<CR>" | redraw
+  call assert_notequal(r1, screenattr(1,1))
+  call assert_fails('let v:hlsearch=[]', 'E745:')
+  call garbagecollect(1)
+  call getchar(1)
+  enew!
+endfunc
+
+func Test_hlsearch_hangs()
+  CheckFunction reltimefloat
+
+  " So, it turns out that Windows 7 implements TimerQueue timers differently
+  " and they can expire *before* the requested time has elapsed. So allow for
+  " the timeout occurring after 80 ms (5 * 16 (the typical clock tick)).
+  if has("win32")
+    let min_timeout = 0.08
+  else
+    let min_timeout = 0.1
+  endif
+
+  " This pattern takes a long time to match, it should timeout.
+  new
+  call setline(1, ['aaa', repeat('abc ', 1000), 'ccc'])
+  let start = reltime()
+  set hlsearch nolazyredraw redrawtime=101
+  let @/ = '\%#=1a*.*X\@<=b*'
+  redraw
+  let elapsed = reltimefloat(reltime(start))
+  call assert_inrange(min_timeout, 1.0, elapsed)
+  set nohlsearch redrawtime&
+  bwipe!
+endfunc
+
+func Test_hlsearch_eol_highlight()
+  new
+  call append(1, repeat([''], 9))
+  set hlsearch nolazyredraw
+  exe "normal! /$\<CR>" | redraw
+  let attr = screenattr(1, 1)
+  for row in range(2, 10)
+    call assert_equal(attr, screenattr(row, 1), 'in line ' . row)
+  endfor
+  set nohlsearch
+  bwipe!
+endfunc
+
+func Test_hlsearch_Ctrl_R()
+  CheckRunVimInTerminal
+
+  let lines =<< trim END
+      set incsearch hlsearch
+      let @" = "text"
+      put
+  END
+  call writefile(lines, 'XhlsearchCtrlR', 'D')
+  let buf = RunVimInTerminal('-S XhlsearchCtrlR', #{rows: 6, cols: 60})
+
+  call term_sendkeys(buf, "/\<C-R>\<C-R>\"")
+  call VerifyScreenDump(buf, 'Test_hlsearch_ctrlr_1', {})
+
+  call term_sendkeys(buf, "\<Esc>")
+  call StopVimInTerminal(buf)
+endfunc
+
+func Test_hlsearch_clipboard()
+  CheckRunVimInTerminal
+  CheckFeature clipboard_working
+
+  let lines =<< trim END
+      set incsearch hlsearch
+      let @* = "text"
+      put *
+  END
+  call writefile(lines, 'XhlsearchClipboard', 'D')
+  let buf = RunVimInTerminal('-S XhlsearchClipboard', #{rows: 6, cols: 60})
+
+  call term_sendkeys(buf, "/\<C-R>*")
+  call VerifyScreenDump(buf, 'Test_hlsearch_ctrlr_1', {})
+
+  call term_sendkeys(buf, "\<Esc>")
+  call StopVimInTerminal(buf)
+endfunc
+
+" vim: shiftwidth=2 sts=2 expandtab