diff options
| -rw-r--r-- | src/nvim/testdir/setup.vim | 1 | ||||
| -rw-r--r-- | src/nvim/testdir/test_alot.vim | 1 | ||||
| -rw-r--r-- | src/nvim/testdir/test_compiler.vim | 49 |
3 files changed, 51 insertions, 0 deletions
diff --git a/src/nvim/testdir/setup.vim b/src/nvim/testdir/setup.vim index f3cc7da70f..51bf8ce0fc 100644 --- a/src/nvim/testdir/setup.vim +++ b/src/nvim/testdir/setup.vim @@ -33,4 +33,5 @@ if has('win32') let $TERM = '' let &shell = empty($COMSPEC) ? exepath('cmd.exe') : $COMSPEC set shellcmdflag=/s/c shellxquote=\" shellredir=>%s\ 2>&1 + let &shellpipe = &shellredir endif diff --git a/src/nvim/testdir/test_alot.vim b/src/nvim/testdir/test_alot.vim index d026221dac..238dbe8d90 100644 --- a/src/nvim/testdir/test_alot.vim +++ b/src/nvim/testdir/test_alot.vim @@ -4,6 +4,7 @@ source test_assign.vim source test_cd.vim source test_changedtick.vim +source test_compiler.vim source test_cursor_func.vim source test_ex_undo.vim source test_ex_z.vim diff --git a/src/nvim/testdir/test_compiler.vim b/src/nvim/testdir/test_compiler.vim new file mode 100644 index 0000000000..84fba0f9a4 --- /dev/null +++ b/src/nvim/testdir/test_compiler.vim @@ -0,0 +1,49 @@ +" Test the :compiler command + +func Test_compiler() + if !executable('perl') + return + endif + + e Xfoo.pl + compiler perl + call assert_equal('perl', b:current_compiler) + call assert_fails('let g:current_compiler', 'E121:') + + call setline(1, ['#!/usr/bin/perl -w', 'use strict;', 'my $foo=1']) + w! + call feedkeys(":make\<CR>\<CR>", 'tx') + call assert_fails('clist', 'E42:') + + call setline(1, ['#!/usr/bin/perl -w', 'use strict;', '$foo=1']) + w! + call feedkeys(":make\<CR>\<CR>", 'tx') + let a=execute('clist') + call assert_match("\n 1 Xfoo.pl:3: Global symbol \"\$foo\" " + \ . "requires explicit package name", a) + + call delete('Xfoo.pl') + bw! +endfunc + +func Test_compiler_without_arg() + let a=split(execute('compiler')) + call assert_match(expand('^.*runtime/compiler/ant.vim$'), a[0]) + call assert_match(expand('^.*runtime/compiler/bcc.vim$'), a[1]) + call assert_match(expand('^.*runtime/compiler/xmlwf.vim$'), a[-1]) +endfunc + +func Test_compiler_completion() + call feedkeys(":compiler \<C-A>\<C-B>\"\<CR>", 'tx') + call assert_match('^"compiler ant bcc .* xmlwf$', @:) + + call feedkeys(":compiler p\<C-A>\<C-B>\"\<CR>", 'tx') + call assert_equal('"compiler pbx perl php pylint pyunit', @:) + + call feedkeys(":compiler! p\<C-A>\<C-B>\"\<CR>", 'tx') + call assert_equal('"compiler! pbx perl php pylint pyunit', @:) +endfunc + +func Test_compiler_error() + call assert_fails('compiler doesnotexist', 'E666:') +endfunc |