263 lines
6.9 KiB
Plaintext
263 lines
6.9 KiB
Plaintext
To: vim_dev@googlegroups.com
|
||
Subject: Patch 7.3.1223
|
||
Fcc: outbox
|
||
From: Bram Moolenaar <Bram@moolenaar.net>
|
||
Mime-Version: 1.0
|
||
Content-Type: text/plain; charset=UTF-8
|
||
Content-Transfer-Encoding: 8bit
|
||
------------
|
||
|
||
Patch 7.3.1223
|
||
Problem: Tests fail on MS-Windows.
|
||
Solution: Avoid depending on OS version. Use DOS commands instead of Unix
|
||
commands. (Taro Muraoka, Ken Takata)
|
||
Files: src/testdir/test17.in, src/testdir/test50.in,
|
||
src/testdir/test71.in, src/testdir/test77.in
|
||
|
||
|
||
*** ../vim-7.3.1222/src/testdir/test17.in 2012-07-25 13:46:25.000000000 +0200
|
||
--- src/testdir/test17.in 2013-06-19 21:01:57.000000000 +0200
|
||
***************
|
||
*** 9,14 ****
|
||
--- 9,21 ----
|
||
:else
|
||
: set isfname=@,48-57,/,.,-,_,+,,,$,:,~,{,}
|
||
:endif
|
||
+ :function! DeleteDirectory(dir)
|
||
+ : if has("win16") || has("win32") || has("win64") || has("dos16") || has("dos32")
|
||
+ : exec "silent !rmdir /Q /S " . a:dir
|
||
+ : else
|
||
+ : exec "silent !rm -rf " . a:dir
|
||
+ : endif
|
||
+ :endfun
|
||
:if has("unix")
|
||
:let $CDIR = "."
|
||
/CDIR
|
||
***************
|
||
*** 20,25 ****
|
||
--- 27,37 ----
|
||
:endif
|
||
/TDIR
|
||
:endif
|
||
+ :" Dummy writing for making that sure gf doesn't fail even if the current
|
||
+ :" file is modified. It can be occurred when executing the following command
|
||
+ :" directly on Windows without fixing the 'fileformat':
|
||
+ :" > nmake -f Make_dos.mak test17.out
|
||
+ :w! test.out
|
||
gf
|
||
:w! test.out
|
||
:brewind
|
||
***************
|
||
*** 31,40 ****
|
||
STARTTEST
|
||
:" check for 'include' without \zs or \ze
|
||
:lang C
|
||
! :!rm -f ./Xbase.a
|
||
! :!rm -rf ./Xdir1
|
||
! :!mkdir -p Xdir1/dir2
|
||
! :e Xdir1/dir2/foo.a
|
||
i#include "bar.a"
|
||
:w
|
||
:e Xdir1/dir2/bar.a
|
||
--- 43,53 ----
|
||
STARTTEST
|
||
:" check for 'include' without \zs or \ze
|
||
:lang C
|
||
! :call delete("./Xbase.a")
|
||
! :call DeleteDirectory("Xdir1")
|
||
! :!mkdir Xdir1
|
||
! :!mkdir "Xdir1/dir2"
|
||
! :e! Xdir1/dir2/foo.a
|
||
i#include "bar.a"
|
||
:w
|
||
:e Xdir1/dir2/bar.a
|
||
***************
|
||
*** 55,69 ****
|
||
|
||
STARTTEST
|
||
:" check for 'include' with \zs and \ze
|
||
! :!rm -f ./Xbase.b
|
||
! :!rm -rf ./Xdir1
|
||
! :!mkdir -p Xdir1/dir2
|
||
:let &include='^\s*%inc\s*/\zs[^/]\+\ze'
|
||
:function! DotsToSlashes()
|
||
: return substitute(v:fname, '\.', '/', 'g') . '.b'
|
||
:endfunction
|
||
:let &includeexpr='DotsToSlashes()'
|
||
! :e Xdir1/dir2/foo.b
|
||
i%inc /bar/
|
||
:w
|
||
:e Xdir1/dir2/bar.b
|
||
--- 68,83 ----
|
||
|
||
STARTTEST
|
||
:" check for 'include' with \zs and \ze
|
||
! :call delete("./Xbase.b")
|
||
! :call DeleteDirectory("Xdir1")
|
||
! :!mkdir Xdir1
|
||
! :!mkdir "Xdir1/dir2"
|
||
:let &include='^\s*%inc\s*/\zs[^/]\+\ze'
|
||
:function! DotsToSlashes()
|
||
: return substitute(v:fname, '\.', '/', 'g') . '.b'
|
||
:endfunction
|
||
:let &includeexpr='DotsToSlashes()'
|
||
! :e! Xdir1/dir2/foo.b
|
||
i%inc /bar/
|
||
:w
|
||
:e Xdir1/dir2/bar.b
|
||
***************
|
||
*** 84,92 ****
|
||
|
||
STARTTEST
|
||
:" check for 'include' with \zs and no \ze
|
||
! :!rm -f ./Xbase.c
|
||
! :!rm -rf ./Xdir1
|
||
! :!mkdir -p Xdir1/dir2
|
||
:let &include='^\s*%inc\s*\%([[:upper:]][^[:space:]]*\s\+\)\?\zs\S\+\ze'
|
||
:function! StripNewlineChar()
|
||
: if v:fname =~ '\n$'
|
||
--- 98,107 ----
|
||
|
||
STARTTEST
|
||
:" check for 'include' with \zs and no \ze
|
||
! :call delete("./Xbase.c")
|
||
! :call DeleteDirectory("Xdir1")
|
||
! :!mkdir Xdir1
|
||
! :!mkdir "Xdir1/dir2"
|
||
:let &include='^\s*%inc\s*\%([[:upper:]][^[:space:]]*\s\+\)\?\zs\S\+\ze'
|
||
:function! StripNewlineChar()
|
||
: if v:fname =~ '\n$'
|
||
***************
|
||
*** 95,101 ****
|
||
: return v:fname
|
||
:endfunction
|
||
:let &includeexpr='StripNewlineChar()'
|
||
! :e Xdir1/dir2/foo.c
|
||
i%inc bar.c
|
||
:w
|
||
:e Xdir1/dir2/bar.c
|
||
--- 110,116 ----
|
||
: return v:fname
|
||
:endfunction
|
||
:let &includeexpr='StripNewlineChar()'
|
||
! :e! Xdir1/dir2/foo.c
|
||
i%inc bar.c
|
||
:w
|
||
:e Xdir1/dir2/bar.c
|
||
***************
|
||
*** 115,120 ****
|
||
--- 130,139 ----
|
||
:checkpath!
|
||
:redir END
|
||
:brewind
|
||
+ :" replace "\" to "/" for Windows
|
||
+ :e test.out
|
||
+ :%s#\\#/#g
|
||
+ :w
|
||
:q
|
||
ENDTEST
|
||
|
||
*** ../vim-7.3.1222/src/testdir/test50.in 2010-08-15 21:57:29.000000000 +0200
|
||
--- src/testdir/test50.in 2013-06-19 20:03:18.000000000 +0200
|
||
***************
|
||
*** 33,39 ****
|
||
" This could change for CygWin to //cygdrive/c
|
||
let dir1='c:/x.x.y'
|
||
if filereadable(dir1) || isdirectory(dir1)
|
||
! call confirm( "'".dir1."' exists, cannot run test" )
|
||
return
|
||
endif
|
||
let file1=dir1.'/zz.y.txt'
|
||
--- 33,39 ----
|
||
" This could change for CygWin to //cygdrive/c
|
||
let dir1='c:/x.x.y'
|
||
if filereadable(dir1) || isdirectory(dir1)
|
||
! echo "FATAL: '".dir1."' exists, cannot run test"
|
||
return
|
||
endif
|
||
let file1=dir1.'/zz.y.txt'
|
||
***************
|
||
*** 41,53 ****
|
||
let dir2=dir1.'/VimIsTheGreatestSinceSlicedBread'
|
||
let file2=dir2.'/z.txt'
|
||
let nofile2=dir2.'/zz.txt'
|
||
! let resdir1='c:/XX2235~1.Y'
|
||
let resfile1=resdir1.'/ZZY~1.TXT'
|
||
let resnofile1=resdir1.'/z.y.txt'
|
||
let resdir2=resdir1.'/VIMIST~1'
|
||
let resfile2=resdir2.'/z.txt'
|
||
let resnofile2=resdir2.'/zz.txt'
|
||
- call MakeDir( dir1 )
|
||
call MakeDir( dir2 )
|
||
call MakeFile( file1 )
|
||
call MakeFile( file2 )
|
||
--- 41,58 ----
|
||
let dir2=dir1.'/VimIsTheGreatestSinceSlicedBread'
|
||
let file2=dir2.'/z.txt'
|
||
let nofile2=dir2.'/zz.txt'
|
||
! call MakeDir( dir1 )
|
||
! let resdir1 = substitute(fnamemodify(dir1, ':p:8'), '\\$', '', '')
|
||
! if resdir1 !~ '\V\^c:/XX\x\x\x\x~1.Y\$'
|
||
! echo "FATAL: unexpected short name: " . resdir1
|
||
! echo "INFO: please report your OS to vim-dev"
|
||
! return
|
||
! endif
|
||
let resfile1=resdir1.'/ZZY~1.TXT'
|
||
let resnofile1=resdir1.'/z.y.txt'
|
||
let resdir2=resdir1.'/VIMIST~1'
|
||
let resfile2=resdir2.'/z.txt'
|
||
let resnofile2=resdir2.'/zz.txt'
|
||
call MakeDir( dir2 )
|
||
call MakeFile( file1 )
|
||
call MakeFile( file2 )
|
||
*** ../vim-7.3.1222/src/testdir/test71.in 2010-08-15 21:57:29.000000000 +0200
|
||
--- src/testdir/test71.in 2013-06-19 20:09:12.000000000 +0200
|
||
***************
|
||
*** 8,14 ****
|
||
:let cm0_bytes = getline('.', '.')
|
||
:/^start of cm=blowfish bytes/+1
|
||
:let cm1_bytes = getline('.', '.')
|
||
! :bwipe
|
||
:call append(0, text_lines)
|
||
:$d
|
||
:X
|
||
--- 8,14 ----
|
||
:let cm0_bytes = getline('.', '.')
|
||
:/^start of cm=blowfish bytes/+1
|
||
:let cm1_bytes = getline('.', '.')
|
||
! :bwipe!
|
||
:call append(0, text_lines)
|
||
:$d
|
||
:X
|
||
*** ../vim-7.3.1222/src/testdir/test77.in 2012-04-30 11:34:20.000000000 +0200
|
||
--- src/testdir/test77.in 2013-06-19 20:03:54.000000000 +0200
|
||
***************
|
||
*** 23,28 ****
|
||
--- 23,29 ----
|
||
:w! Xtest
|
||
:r !cksum Xtest
|
||
:s/\s/ /g
|
||
+ :set fileformat&
|
||
:.w! test.out
|
||
:qa!
|
||
ENDTEST
|
||
*** ../vim-7.3.1222/src/version.c 2013-06-19 20:11:44.000000000 +0200
|
||
--- src/version.c 2013-06-19 21:03:21.000000000 +0200
|
||
***************
|
||
*** 730,731 ****
|
||
--- 730,733 ----
|
||
{ /* Add new patch number below this line */
|
||
+ /**/
|
||
+ 1223,
|
||
/**/
|
||
|
||
--
|
||
hundred-and-one symptoms of being an internet addict:
|
||
255. You work for a newspaper and your editor asks you to write an
|
||
article about Internet addiction...in the "first person."
|
||
|
||
/// Bram Moolenaar -- Bram@Moolenaar.net -- 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 ///
|