Patch 7.4.2343
Problem:    Too many old file tests.
Solution:   Turn several into new style tests. (Yegappan Lakshmanan)
Files:      src/testdir/Make_all.mak, src/testdir/test101.in,
            src/testdir/test101.ok, src/testdir/test18.in,
            src/testdir/test18.ok, src/testdir/test2.in, src/testdir/test2.ok,
            src/testdir/test21.in, src/testdir/test21.ok,
            src/testdir/test6.in, src/testdir/test6.ok,
            src/testdir/test_arglist.vim, src/testdir/test_charsearch.vim,
            src/testdir/test_fnameescape.vim, src/testdir/test_gf.vim,
            src/testdir/test_hlsearch.vim, src/testdir/test_smartindent.vim,
            src/testdir/test_tagjump.vim, src/Makefile


*** ../vim-7.4.2342/src/testdir/Make_all.mak    2016-09-04 19:50:50.520985732 
+0200
--- src/testdir/Make_all.mak    2016-09-07 20:37:01.338019898 +0200
***************
*** 13,28 ****
        test3.out \
        test4.out \
        test5.out \
-       test6.out \
        test7.out \
        test8.out \
        test9.out \
        test14.out \
        test15.out \
-       test18.out \
        test19.out \
        test20.out \
-       test21.out \
        test22.out \
        test23.out \
        test24.out \
--- 13,25 ----
***************
*** 74,80 ****
        test95.out \
        test98.out \
        test99.out \
-       test101.out \
        test103.out \
        test104.out \
        test107.out \
--- 71,76 ----
***************
*** 109,115 ****
  
  # Tests that run on most systems, but not on Amiga and DOS/Windows.
  SCRIPTS_MORE2 = \
-       test2.out \
        test12.out \
        test25.out \
        test49.out \
--- 105,110 ----
***************
*** 147,153 ****
  # Keep test_alot*.res as the last one, sort the others.
  NEW_TESTS = test_arglist.res \
            test_assert.res \
!           test_autochdir \
            test_backspace_opt.res \
            test_bufwintabinfo.res \
            test_cdo.res \
--- 142,148 ----
  # Keep test_alot*.res as the last one, sort the others.
  NEW_TESTS = test_arglist.res \
            test_assert.res \
!           test_autochdir.res \
            test_backspace_opt.res \
            test_bufwintabinfo.res \
            test_cdo.res \
***************
*** 159,168 ****
--- 154,165 ----
            test_digraph.res \
            test_farsi.res \
            test_fnameescape.res \
+           test_gf.res \
            test_gn.res \
            test_gui.res \
            test_hardcopy.res \
            test_history.res \
+           test_hlsearch.res \
            test_increment.res \
            test_increment_dbcs.res \
            test_job_fails.res \
***************
*** 180,185 ****
--- 177,183 ----
            test_ruby.res \
            test_search.res \
            test_signs.res \
+           test_smartindent.res \
            test_startup.res \
            test_startup_utf8.res \
            test_stat.res \
*** ../vim-7.4.2342/src/testdir/test101.in      2014-11-27 19:14:45.080940970 
+0100
--- src/testdir/test101.in      1970-01-01 01:00:00.000000000 +0100
***************
*** 1,48 ****
- Test for v:hlsearch     vim: set ft=vim :
- 
- STARTTEST
- :" Last abc: Q
- :so small.vim
- :new
- :call setline(1, repeat(['aaa'], 10))
- :set hlsearch nolazyredraw
- :let r=[]
- :command -nargs=0 -bar AddR :call add(r, [screenattr(1, 1), v:hlsearch])
- /aaa
- :AddR
- :nohlsearch
- :AddR
- :let v:hlsearch=1
- :AddR
- :let v:hlsearch=0
- :AddR
- :set hlsearch
- :AddR
- :let v:hlsearch=0
- :AddR
- n:AddR
- :let v:hlsearch=0
- :AddR
- /
- :AddR
- :set nohls
- /
- :AddR
- :let r1=r[0][0]
- :" I guess it is not guaranteed that screenattr outputs always the same 
character
- :call map(r, 'v:val[1].":".(v:val[0]==r1?"highlighted":"not highlighted")')
- :try
- :   let v:hlsearch=[]
- :catch
- :   call add(r, matchstr(v:exception,'^Vim(let):E\d\+:'))
- :endtry
- :bwipeout!
- :$put=r
- :call garbagecollect(1)
- :"
- :/^start:/,$wq! test.out
- :" vim: et ts=4 isk-=\:
- :call getchar()
- ENDTEST
- 
- start:
--- 0 ----
*** ../vim-7.4.2342/src/testdir/test101.ok      2016-03-12 19:33:43.426403392 
+0100
--- src/testdir/test101.ok      1970-01-01 01:00:00.000000000 +0100
***************
*** 1,12 ****
- start:
- 1:highlighted
- 0:not highlighted
- 1:highlighted
- 0:not highlighted
- 1:highlighted
- 0:not highlighted
- 1:highlighted
- 0:not highlighted
- 1:highlighted
- 0:not highlighted
- Vim(let):E745:
--- 0 ----
*** ../vim-7.4.2342/src/testdir/test18.in       2010-05-15 13:04:10.000000000 
+0200
--- src/testdir/test18.in       1970-01-01 01:00:00.000000000 +0100
***************
*** 1,16 ****
- Tests for not doing smart indenting when it isn't set.
- 
- STARTTEST
- :so small.vim
- :set nocin nosi ai
- /some
- 2cc#test 
- :?start?,$w! test.out
- :qa!
- ENDTEST
- 
- start text
-               some test text
-               test text
- test text
-               test text
--- 0 ----
*** ../vim-7.4.2342/src/testdir/test18.ok       2010-05-15 13:04:10.000000000 
+0200
--- src/testdir/test18.ok       1970-01-01 01:00:00.000000000 +0100
***************
*** 1,4 ****
- start text
-               #test
- test text
-               test text
--- 0 ----
*** ../vim-7.4.2342/src/testdir/test2.in        2010-05-15 13:04:10.000000000 
+0200
--- src/testdir/test2.in        1970-01-01 01:00:00.000000000 +0100
***************
*** 1,29 ****
- 
- This is a test if a URL is recognized by "gf", with the cursor before and
- after the "://".  Also test ":\\".
- 
- STARTTEST
- :so small.vim
- /^first
- /tmp
- :call append(0, expand("<cfile>"))
- /^second
- /URL
- :call append(1, expand("<cfile>"))
- :if has("ebcdic")
- : set isf=@,240-249,/,.,-,_,+,,,$,:,~,\
- :else
- : set isf=@,48-57,/,.,-,_,+,,,$,:,~,\
- :endif
- /^third
- /name
- :call append(2, expand("<cfile>"))
- /^fourth
- /URL
- :call append(3, expand("<cfile>"))
- 5GdG:wq! test.out
- ENDTEST
- first test for URL://machine.name/tmp/vimtest2a and other text
- second test for URL://machine.name/tmp/vimtest2b. And other text
- third test for URL:\\machine.name\vimtest2c and other text
- fourth test for URL:\\machine.name\tmp\vimtest2d, and other text
--- 0 ----
*** ../vim-7.4.2342/src/testdir/test2.ok        2010-05-15 13:04:10.000000000 
+0200
--- src/testdir/test2.ok        1970-01-01 01:00:00.000000000 +0100
***************
*** 1,4 ****
- URL://machine.name/tmp/vimtest2a
- URL://machine.name/tmp/vimtest2b
- URL:\\machine.name\vimtest2c
- URL:\\machine.name\tmp\vimtest2d
--- 0 ----
*** ../vim-7.4.2342/src/testdir/test21.in       2010-05-15 13:04:10.000000000 
+0200
--- src/testdir/test21.in       1970-01-01 01:00:00.000000000 +0100
***************
*** 1,19 ****
- Tests for [ CTRL-I with a count and CTRL-W CTRL-I with a count
- 
- STARTTEST
- :so small.vim
- /start
- 6[    :.w! test.out
- ?start here
- 6     :.w >>test.out
- :qa!
- ENDTEST
- 
- #include test21.in
- 
- /* test text test tex start here
-               some text
-               test text
-               start OK if found this line
-       start found wrong line
- test text
--- 0 ----
*** ../vim-7.4.2342/src/testdir/test21.ok       2010-05-15 13:04:10.000000000 
+0200
--- src/testdir/test21.ok       1970-01-01 01:00:00.000000000 +0100
***************
*** 1,2 ****
-               start OK if found this line
-               start OK if found this line
--- 0 ----
*** ../vim-7.4.2342/src/testdir/test6.in        2010-05-15 13:04:10.000000000 
+0200
--- src/testdir/test6.in        1970-01-01 01:00:00.000000000 +0100
***************
*** 1,24 ****
- Test for autocommand that redefines the argument list, when doing ":all".
- 
- STARTTEST
- :so small.vim
- :au BufReadPost Xxx2 next Xxx2 Xxx1
- /^start of
- A1 :.,/end of/w! Xxx1    " write test file Xxx1
- $r2:.,/end of/w! Xxx2     " write test file Xxx2
- $r3:.,/end of/w! Xxx3     " write test file Xxx3
- :next! Xxx1 Xxx2 Xxx3     " redefine arglist; go to Xxx1
- :all                      " open window for all args
- :w! test.out              " Write contents of Xxx1
-     :w >>test.out     " Append contents of last window (Xxx1)
- :rew                      " should now be in Xxx2
- :w >>test.out             " Append contents of Xxx2
- :qa!
- ENDTEST
- 
- start of test file Xxx
-       this is a test
-       this is a test
-       this is a test
-       this is a test
- end of test file Xxx
--- 0 ----
*** ../vim-7.4.2342/src/testdir/test6.ok        2010-05-15 13:04:10.000000000 
+0200
--- src/testdir/test6.ok        1970-01-01 01:00:00.000000000 +0100
***************
*** 1,18 ****
- start of test file Xxx1
-       this is a test
-       this is a test
-       this is a test
-       this is a test
- end of test file Xxx
- start of test file Xxx1
-       this is a test
-       this is a test
-       this is a test
-       this is a test
- end of test file Xxx
- start of test file Xxx2
-       this is a test
-       this is a test
-       this is a test
-       this is a test
- end of test file Xxx
--- 0 ----
*** ../vim-7.4.2342/src/testdir/test_arglist.vim        2016-01-23 
23:02:30.252636325 +0100
--- src/testdir/test_arglist.vim        2016-09-07 20:37:01.338019898 +0200
***************
*** 287,289 ****
--- 287,318 ----
    call assert_equal(0, argidx())
    %argd
  endfunction
+ 
+ " Test for autocommand that redefines the argument list, when doing ":all".
+ function Test_arglist_autocmd()
+   autocmd BufReadPost Xxx2 next Xxx2 Xxx1
+   call writefile(['test file Xxx1'], 'Xxx1')
+   call writefile(['test file Xxx2'], 'Xxx2')
+   call writefile(['test file Xxx3'], 'Xxx3')
+ 
+   new
+   " redefine arglist; go to Xxx1
+   next! Xxx1 Xxx2 Xxx3
+   " open window for all args
+   all
+   call assert_equal('test file Xxx1', getline(1))
+   wincmd w
+   wincmd w
+   call assert_equal('test file Xxx1', getline(1))
+   " should now be in Xxx2
+   rewind
+   call assert_equal('test file Xxx2', getline(1))
+ 
+   autocmd! BufReadPost Xxx2
+   enew! | only
+   call delete('Xxx1')
+   call delete('Xxx2')
+   call delete('Xxx3')
+   argdelete Xxx*
+   bwipe! Xxx1 Xxx2 Xxx3
+ endfunction
*** ../vim-7.4.2342/src/testdir/test_charsearch.vim     2016-09-02 
19:50:08.436097707 +0200
--- src/testdir/test_charsearch.vim     2016-09-07 20:37:01.338019898 +0200
***************
*** 2,9 ****
  function! Test_charsearch()
    enew!
    call append(0, ['Xabcdefghijkemnopqretuvwxyz',
!               \ 'Yabcdefghijkemnopqretuvwxyz',
!               \ 'Zabcdefghijkemnokqretkvwxyz'])
    " check that "fe" and ";" work
    1
    normal! ylfep;;p,,p
--- 2,9 ----
  function! Test_charsearch()
    enew!
    call append(0, ['Xabcdefghijkemnopqretuvwxyz',
!             \ 'Yabcdefghijkemnopqretuvwxyz',
!             \ 'Zabcdefghijkemnokqretkvwxyz'])
    " check that "fe" and ";" work
    1
    normal! ylfep;;p,,p
*** ../vim-7.4.2342/src/testdir/test_fnameescape.vim    2016-09-02 
19:50:08.436097707 +0200
--- src/testdir/test_fnameescape.vim    2016-09-07 20:37:01.338019898 +0200
***************
*** 6,12 ****
    try
      exe "w! " . fnameescape(fname)
      let status = v:true
!   endtry 
    call assert_true(status, "Space")
    call delete(fname)
  
--- 6,12 ----
    try
      exe "w! " . fnameescape(fname)
      let status = v:true
!   endtry
    call assert_true(status, "Space")
    call delete(fname)
  
*** ../vim-7.4.2342/src/testdir/test_gf.vim     2016-09-07 20:45:25.365833759 
+0200
--- src/testdir/test_gf.vim     2016-09-07 20:37:01.338019898 +0200
***************
*** 0 ****
--- 1,33 ----
+ 
+ " This is a test if a URL is recognized by "gf", with the cursor before and
+ " after the "://".  Also test ":\\".
+ function! Test_gf_url()
+   enew!
+   call append(0, [
+       \ "first test for URL://machine.name/tmp/vimtest2a and other text",
+       \ "second test for URL://machine.name/tmp/vimtest2b. And other text",
+       \ "third test for URL:\\\\machine.name\\vimtest2c and other text",
+       \ "fourth test for URL:\\\\machine.name\\tmp\\vimtest2d, and other text"
+       \ ])
+   call cursor(1,1)
+   call search("^first")
+   call search("tmp")
+   call assert_equal("URL://machine.name/tmp/vimtest2a", expand("<cfile>"))
+   call search("^second")
+   call search("URL")
+   call assert_equal("URL://machine.name/tmp/vimtest2b", expand("<cfile>"))
+   if has("ebcdic")
+       set isf=@,240-249,/,.,-,_,+,,,$,:,~,\
+   else
+       set isf=@,48-57,/,.,-,_,+,,,$,:,~,\
+   endif
+   call search("^third")
+   call search("name")
+   call assert_equal("URL:\\\\machine.name\\vimtest2c", expand("<cfile>"))
+   call search("^fourth")
+   call search("URL")
+   call assert_equal("URL:\\\\machine.name\\tmp\\vimtest2d", expand("<cfile>"))
+ 
+   set isf&vim
+   enew!
+ endfunction
*** ../vim-7.4.2342/src/testdir/test_hlsearch.vim       2016-09-07 
20:45:25.369833726 +0200
--- src/testdir/test_hlsearch.vim       2016-09-07 20:37:01.338019898 +0200
***************
*** 0 ****
--- 1,34 ----
+ " Test for v:hlsearch
+ 
+ function! Test_hlsearch()
+   new
+   call setline(1, repeat(['aaa'], 10))
+   set hlsearch nolazyredraw
+   let r=[]
+   " 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!
+ endfunction
*** ../vim-7.4.2342/src/testdir/test_smartindent.vim    2016-09-07 
20:45:25.377833660 +0200
--- src/testdir/test_smartindent.vim    2016-09-07 20:37:01.338019898 +0200
***************
*** 0 ****
--- 1,14 ----
+ 
+ " Tests for not doing smart indenting when it isn't set.
+ function! Test_nosmartindent()
+   new
+   call append(0, ["           some test text",
+               \ "             test text",
+               \ "test text",
+               \ "             test text"])
+   set nocindent nosmartindent autoindent
+   exe "normal! gg/some\<CR>"
+   exe "normal! 2cc#test\<Esc>"
+   call assert_equal("         #test", getline(1))
+   enew! | close
+ endfunction
*** ../vim-7.4.2342/src/testdir/test_tagjump.vim        2016-08-24 
21:21:22.572601394 +0200
--- src/testdir/test_tagjump.vim        2016-09-07 20:37:01.338019898 +0200
***************
*** 23,26 ****
--- 23,56 ----
    quit
  endfunc
  
+ " Tests for [ CTRL-I and CTRL-W CTRL-I commands
+ function Test_keyword_jump()
+   call writefile(["#include Xinclude", "",
+             \ "",
+             \ "/* test text test tex start here",
+             \ "               some text",
+             \ "               test text",
+             \ "               start OK if found this line",
+             \ "       start found wrong line",
+             \ "test text"], 'Xtestfile')
+   call writefile(["/* test text test tex start here",
+             \ "               some text",
+             \ "               test text",
+             \ "               start OK if found this line",
+             \ "       start found wrong line",
+             \ "test text"], 'Xinclude')
+   new Xtestfile
+   call cursor(1,1)
+   call search("start")
+   exe "normal! 5[\<C-I>"
+   call assert_equal("         start OK if found this line", getline('.'))
+   call cursor(1,1)
+   call search("start")
+   exe "normal! 5\<C-W>\<C-I>"
+   call assert_equal("         start OK if found this line", getline('.'))
+   enew! | only
+   call delete('Xtestfile')
+   call delete('Xinclude')
+ endfunction
+ 
  " vim: shiftwidth=2 sts=2 expandtab
*** ../vim-7.4.2342/src/Makefile        2016-09-04 19:50:50.524985699 +0200
--- src/Makefile        2016-09-07 20:39:12.952926519 +0200
***************
*** 2041,2047 ****
        test_search_mbyte \
        test_utf8 \
        test_wordcount \
!       test2 test3 test4 test5 test6 test7 test8 test9 \
        test11 test12 test14 test15 test17 test18 test19 \
        test20 test21 test22 test23 test24 test25 test26 test27 test28 test29 \
        test30 test31 test32 test33 test34 test36 test37 test38 test39 \
--- 2041,2047 ----
        test_search_mbyte \
        test_utf8 \
        test_wordcount \
!       test3 test4 test5 test6 test7 test8 test9 \
        test11 test12 test14 test15 test17 test18 test19 \
        test20 test21 test22 test23 test24 test25 test26 test27 test28 test29 \
        test30 test31 test32 test33 test34 test36 test37 test38 test39 \
***************
*** 2085,2096 ****
--- 2085,2098 ----
        test_fnameescape \
        test_fnamemodify \
        test_glob2regpat \
+       test_gf \
        test_gn \
        test_goto \
        test_gui \
        test_hardcopy \
        test_help_tagjump \
        test_history \
+       test_hlsearch \
        test_increment \
        test_increment_dbcs \
        test_job_fails \
***************
*** 2128,2133 ****
--- 2130,2136 ----
        test_signs \
        test_sort \
        test_source_utf8 \
+       test_smartindent \
        test_startup \
        test_startup_utf8 \
        test_stat \
*** ../vim-7.4.2342/src/version.c       2016-09-06 23:23:46.389460230 +0200
--- src/version.c       2016-09-07 20:39:28.180800027 +0200
***************
*** 765,766 ****
--- 765,768 ----
  {   /* Add new patch number below this line */
+ /**/
+     2343,
  /**/

-- 
hundred-and-one symptoms of being an internet addict:
190. You quickly hand over your wallet, leather jacket, and car keys
     during a mugging, then proceed to beat the crap out of your
     assailant when he asks for your laptop.

 /// Bram Moolenaar -- [email protected] -- http://www.Moolenaar.net   \\\
///        sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
\\\  an exciting new programming language -- http://www.Zimbu.org        ///
 \\\            help me help AIDS victims -- http://ICCF-Holland.org    ///

-- 
-- 
You received this message from the "vim_dev" maillist.
Do not top-post! Type your reply below the text you are replying to.
For more information, visit http://www.vim.org/maillist.php

--- 
You received this message because you are subscribed to the Google Groups 
"vim_dev" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
For more options, visit https://groups.google.com/d/optout.

Raspunde prin e-mail lui