1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
|
To: vim_dev@googlegroups.com
Subject: Patch 8.1.0003
Fcc: outbox
From: Bram Moolenaar <Bram@moolenaar.net>
Mime-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
------------
Patch 8.1.0003
Problem: The :compiler command is not tested.
Solution: Add a test. (Dominique Pelle, closes #2930)
Files: src/Makefile, src/testdir/test_alot.vim,
src/testdir/test_compiler.vim
*** ../vim-8.1.0002/src/Makefile 2018-05-17 15:34:28.000000000 +0200
--- src/Makefile 2018-05-19 14:57:04.670463659 +0200
***************
*** 2150,2155 ****
--- 2150,2156 ----
test_cmdline \
test_command_count \
test_comparators \
+ test_compiler \
test_crypt \
test_cscope \
test_cursor_func \
*** ../vim-8.1.0002/src/testdir/test_alot.vim 2017-10-29 15:08:48.000000000 +0100
--- src/testdir/test_alot.vim 2018-05-19 14:57:04.670463659 +0200
***************
*** 5,10 ****
--- 5,11 ----
source test_bufline.vim
source test_cd.vim
source test_changedtick.vim
+ source test_compiler.vim
source test_cursor_func.vim
source test_delete.vim
source test_ex_undo.vim
*** ../vim-8.1.0002/src/testdir/test_compiler.vim 2018-05-19 15:00:23.281190298 +0200
--- src/testdir/test_compiler.vim 2018-05-19 14:57:04.670463659 +0200
***************
*** 0 ****
--- 1,50 ----
+ " 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_equal("\n 1 Xfoo.pl:3: Global symbol \"\$foo\" "
+ \ . "requires explicit package name "
+ \ . "(did you forget to declare \"my $foo\"?)", a)
+
+ call delete('Xfoo.pl')
+ bw!
+ endfunc
+
+ func Test_compiler_without_arg()
+ let a=split(execute('compiler'))
+ call assert_equal($VIMRUNTIME . '/compiler/ant.vim', a[0])
+ call assert_equal($VIMRUNTIME . '/compiler/bcc.vim', a[1])
+ call assert_equal($VIMRUNTIME . '/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
*** ../vim-8.1.0002/src/version.c 2018-05-19 14:43:26.779509715 +0200
--- src/version.c 2018-05-19 14:58:56.017772272 +0200
***************
*** 763,764 ****
--- 763,766 ----
{ /* Add new patch number below this line */
+ /**/
+ 3,
/**/
--
The Characters and incidents portrayed and the names used are fictitious and
any similarity to the names, characters, or history of any person is entirely
accidental and unintentional.
Signed RICHARD M. NIXON
"Monty Python and the Holy Grail" PYTHON (MONTY) PICTURES LTD
/// 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 ///
|
