source: patches/vim-7.2-branch_update-8.patch@ 4f743c5

clfs-1.2 clfs-2.1 clfs-3.0.0-systemd clfs-3.0.0-sysvinit systemd sysvinit
Last change on this file since 4f743c5 was 61a83e8, checked in by Jim Gifford <clfs@…>, 16 years ago

Updated Vim Branch Update Patch to -8.

  • Property mode set to 100644
File size: 193.8 KB
RevLine 
[43c52a1]1Submitted By: Jim Gifford (jim at cross-lfs dot org)
[61a83e8]2Date: 02-15-2009
[76dd250]3Initial Package Version: 7.2
4Origin: Upstream
5Upstream Status: Applied
[61a83e8]6Description: Contains all upstream patches up to 7.2.108
[76dd250]7 The following patches were skipped
[9a875fd]8 007 036 041 049 071 072 074 088 089 093 101
[76dd250]9
10diff -Naur vim72.orig/Filelist vim72/Filelist
11--- vim72.orig/Filelist 2008-07-06 11:02:23.000000000 -0700
[61a83e8]12+++ vim72/Filelist 2009-02-15 23:26:03.078324067 -0800
[76dd250]13@@ -285,6 +285,7 @@
14 src/proto/os_win32.pro \
15 src/proto/os_mswin.pro \
16 src/testdir/Make_dos.mak \
17+ src/testdir/Make_ming.mak \
18 src/testdir/dos.vim \
19 src/uninstal.c \
20 src/vim.def \
21diff -Naur vim72.orig/runtime/doc/cmdline.txt vim72/runtime/doc/cmdline.txt
22--- vim72.orig/runtime/doc/cmdline.txt 2008-08-09 07:22:59.000000000 -0700
[61a83e8]23+++ vim72/runtime/doc/cmdline.txt 2009-02-15 23:26:29.516017600 -0800
[76dd250]24@@ -1,4 +1,4 @@
25-*cmdline.txt* For Vim version 7.2. Last change: 2008 Jul 29
26+*cmdline.txt* For Vim version 7.2. Last change: 2008 Sep 18
27
28
29 VIM REFERENCE MANUAL by Bram Moolenaar
30@@ -157,6 +157,11 @@
31 (doesn't work at the expression prompt; some
32 things such as changing the buffer or current
33 window are not allowed to avoid side effects)
34+ When the result is a |List| the items are used
35+ as lines. They can have line breaks inside
36+ too.
37+ When the result is a Float it's automatically
38+ converted to a String.
39 See |registers| about registers. {not in Vi}
40 Implementation detail: When using the |expression| register
41 and invoking setcmdpos(), this sets the position before
42@@ -730,19 +735,29 @@
43 In Ex commands, at places where a file name can be used, the following
44 characters have a special meaning. These can also be used in the expression
45 function expand() |expand()|.
46- % is replaced with the current file name *:_%*
47- # is replaced with the alternate file name *:_#*
48+ % Is replaced with the current file name. *:_%* *c_%*
49+ # Is replaced with the alternate file name. *:_#* *c_#*
50 #n (where n is a number) is replaced with the file name of
51- buffer n. "#0" is the same as "#"
52- ## is replaced with all names in the argument list *:_##*
53+ buffer n. "#0" is the same as "#".
54+ ## Is replaced with all names in the argument list *:_##* *c_##*
55 concatenated, separated by spaces. Each space in a name
56 is preceded with a backslash.
57-Note that these give the file name as it was typed. If an absolute path is
58-needed (when using the file name from a different directory), you need to add
59-":p". See |filename-modifiers|.
60+ #<n (where n is a number > 0) is replaced with old *:_#<* *c_#<*
61+ file name n. See |:oldfiles| or |v:oldfiles| to get the
62+ number. *E809*
63+ {only when compiled with the +eval and +viminfo features}
64+
65+Note that these, except "#<n", give the file name as it was typed. If an
66+absolute path is needed (when using the file name from a different directory),
67+you need to add ":p". See |filename-modifiers|.
68+
69+The "#<n" item returns an absolute path, but it will start with "~/" for files
70+below your home directory.
71+
72 Note that backslashes are inserted before spaces, so that the command will
73 correctly interpret the file name. But this doesn't happen for shell
74-commands. For those you probably have to use quotes: >
75+commands. For those you probably have to use quotes (this fails for files
76+that contain a quote and wildcards): >
77 :!ls "%"
78 :r !spell "%"
79
80diff -Naur vim72.orig/runtime/doc/eval.txt vim72/runtime/doc/eval.txt
81--- vim72.orig/runtime/doc/eval.txt 2008-08-09 07:22:59.000000000 -0700
[61a83e8]82+++ vim72/runtime/doc/eval.txt 2009-02-15 23:28:13.518683894 -0800
[76dd250]83@@ -1,4 +1,4 @@
84-*eval.txt* For Vim version 7.2. Last change: 2008 Aug 09
85+*eval.txt* For Vim version 7.2. Last change: 2008 Nov 27
86
87
88 VIM REFERENCE MANUAL by Bram Moolenaar
89@@ -1484,6 +1484,17 @@
90 This is the screen column number, like with |virtcol()|. The
91 value is zero when there was no mouse button click.
92
93+ *v:oldfiles* *oldfiles-variable*
94+v:oldfiles List of file names that is loaded from the |viminfo| file on
95+ startup. These are the files that Vim remembers marks for.
96+ The length of the List is limited by the ' argument of the
97+ 'viminfo' option (default is 100).
98+ Also see |:oldfiles| and |c_#<|.
99+ The List can be modified, but this has no effect on what is
100+ stored in the |viminfo| file later. If you use values other
101+ than String this will cause trouble.
102+ {only when compiled with the +viminfo feature}
103+
104 *v:operator* *operator-variable*
105 v:operator The last operator given in Normal mode. This is a single
106 character except for commands starting with <g> or <z>,
107@@ -1695,7 +1706,7 @@
108 exists( {expr}) Number TRUE if {expr} exists
109 extend({expr1}, {expr2} [, {expr3}])
110 List/Dict insert items of {expr2} into {expr1}
111-expand( {expr}) String expand special keywords in {expr}
112+expand( {expr} [, {flag}]) String expand special keywords in {expr}
113 feedkeys( {string} [, {mode}]) Number add key sequence to typeahead buffer
114 filereadable( {file}) Number TRUE if {file} is a readable file
115 filewritable( {file}) Number TRUE if {file} is a writable file
116@@ -1747,8 +1758,9 @@
117 getwinposx() Number X coord in pixels of GUI Vim window
118 getwinposy() Number Y coord in pixels of GUI Vim window
119 getwinvar( {nr}, {varname}) any variable {varname} in window {nr}
120-glob( {expr}) String expand file wildcards in {expr}
121-globpath( {path}, {expr}) String do glob({expr}) for all dirs in {path}
122+glob( {expr} [, {flag}]) String expand file wildcards in {expr}
123+globpath( {path}, {expr} [, {flag}])
124+ String do glob({expr}) for all dirs in {path}
125 has( {feature}) Number TRUE if feature {feature} supported
126 has_key( {dict}, {key}) Number TRUE if {dict} has entry {key}
127 haslocaldir() Number TRUE if current window executed |:lcd|
128@@ -3275,14 +3287,16 @@
129 :let list_is_on = getwinvar(2, '&list')
130 :echo "myvar = " . getwinvar(1, 'myvar')
131 <
132- *glob()*
133-glob({expr}) Expand the file wildcards in {expr}. See |wildcards| for the
134+glob({expr} [, {flag}]) *glob()*
135+ Expand the file wildcards in {expr}. See |wildcards| for the
136 use of special characters.
137 The result is a String.
138 When there are several matches, they are separated by <NL>
139 characters.
140- The 'wildignore' option applies: Names matching one of the
141- patterns in 'wildignore' will be skipped.
142+ Unless the optional {flag} argument is given and is non-zero,
143+ the 'suffixes' and 'wildignore' options apply: Names matching
144+ one of the patterns in 'wildignore' will be skipped and
145+ 'suffixes' affect the ordering of matches.
146 If the expansion fails, the result is an empty string.
147 A name for a non-existing file is not included.
148
149@@ -3296,20 +3310,22 @@
150 See |expand()| for expanding special Vim variables. See
151 |system()| for getting the raw output of an external command.
152
153-globpath({path}, {expr}) *globpath()*
154+globpath({path}, {expr} [, {flag}]) *globpath()*
155 Perform glob() on all directories in {path} and concatenate
156 the results. Example: >
157 :echo globpath(&rtp, "syntax/c.vim")
158 < {path} is a comma-separated list of directory names. Each
159 directory name is prepended to {expr} and expanded like with
160- glob(). A path separator is inserted when needed.
161+ |glob()|. A path separator is inserted when needed.
162 To add a comma inside a directory name escape it with a
163 backslash. Note that on MS-Windows a directory may have a
164 trailing backslash, remove it if you put a comma after it.
165 If the expansion fails for one of the directories, there is no
166 error message.
167- The 'wildignore' option applies: Names matching one of the
168- patterns in 'wildignore' will be skipped.
169+ Unless the optional {flag} argument is given and is non-zero,
170+ the 'suffixes' and 'wildignore' options apply: Names matching
171+ one of the patterns in 'wildignore' will be skipped and
172+ 'suffixes' affect the ordering of matches.
173
174 The "**" item can be used to search in a directory tree.
175 For example, to find all "README.txt" files in the directories
176@@ -5332,10 +5348,12 @@
177 "fg" foreground color (GUI: color name used to set
178 the color, cterm: color number as a string,
179 term: empty string)
180- "bg" background color (like "fg")
181+ "bg" background color (as with "fg")
182+ "sp" special color (as with "fg") |highlight-guisp|
183 "fg#" like "fg", but for the GUI and the GUI is
184 running the name in "#RRGGBB" form
185 "bg#" like "fg#" for "bg"
186+ "sp#" like "fg#" for "sp"
187 "bold" "1" if bold
188 "italic" "1" if italic
189 "reverse" "1" if reverse
190@@ -5823,7 +5841,8 @@
191 mouse_pterm Compiled with support for qnx pterm mouse.
192 mouse_sysmouse Compiled with support for sysmouse (*BSD console mouse)
193 mouse_xterm Compiled with support for xterm mouse.
194-multi_byte Compiled with support for editing Korean et al.
195+multi_byte Compiled with support for 'encoding'
196+multi_byte_encoding 'encoding' is set to a multi-byte encoding.
197 multi_byte_ime Compiled with support for IME input method.
198 multi_lang Compiled with support for multiple languages.
199 mzscheme Compiled with MzScheme interface |mzscheme|.
[43c52a1]200diff -Naur vim72.orig/runtime/doc/netbeans.txt vim72/runtime/doc/netbeans.txt
201--- vim72.orig/runtime/doc/netbeans.txt 2008-08-09 07:22:59.000000000 -0700
[61a83e8]202+++ vim72/runtime/doc/netbeans.txt 2009-02-15 23:28:48.044895935 -0800
[43c52a1]203@@ -1,4 +1,4 @@
204-*netbeans.txt* For Vim version 7.2. Last change: 2008 Jun 28
205+*netbeans.txt* For Vim version 7.2. Last change: 2009 Jan 06
206
207
208 VIM REFERENCE MANUAL by Gordon Prieur et al.
209@@ -722,8 +722,10 @@
210 of the cursor.
211 New in version 2.1.
212
213-killed A file was closed by the user. Only for files that have been
214- assigned a number by the IDE.
215+killed A file was deleted or wiped out by the user and the buffer
216+ annotations have been removed. The bufID number for this
217+ buffer has become invalid. Only for files that have been
218+ assigned a bufID number by the IDE.
219
220 newDotAndMark off off
221 Reports the position of the cursor being at "off" bytes into
[76dd250]222diff -Naur vim72.orig/runtime/doc/options.txt vim72/runtime/doc/options.txt
223--- vim72.orig/runtime/doc/options.txt 2008-08-09 07:22:59.000000000 -0700
[61a83e8]224+++ vim72/runtime/doc/options.txt 2009-02-15 23:27:23.659489593 -0800
[76dd250]225@@ -1,4 +1,4 @@
226-*options.txt* For Vim version 7.2. Last change: 2008 Aug 06
227+*options.txt* For Vim version 7.2. Last change: 2008 Nov 25
228
229
230 VIM REFERENCE MANUAL by Bram Moolenaar
231@@ -7472,7 +7472,9 @@
232 {not available when compiled without the |+wildignore|
233 feature}
234 A list of file patterns. A file that matches with one of these
235- patterns is ignored when completing file or directory names.
236+ patterns is ignored when completing file or directory names, and
237+ influences the result of |expand()|, |glob()| and |globpath()| unless
238+ a flag is passed to disable this.
239 The pattern is used like with |:autocmd|, see |autocmd-patterns|.
240 Also see 'suffixes'.
241 Example: >
242diff -Naur vim72.orig/runtime/doc/spell.txt vim72/runtime/doc/spell.txt
243--- vim72.orig/runtime/doc/spell.txt 2008-08-09 07:23:00.000000000 -0700
[61a83e8]244+++ vim72/runtime/doc/spell.txt 2009-02-15 23:27:49.861165805 -0800
[76dd250]245@@ -1,4 +1,4 @@
246-*spell.txt* For Vim version 7.2. Last change: 2008 Jun 21
247+*spell.txt* For Vim version 7.2. Last change: 2008 Nov 30
248
249
250 VIM REFERENCE MANUAL by Bram Moolenaar
251@@ -831,8 +831,11 @@
252
253 # comment line ~
254
255-With some items it's also possible to put a comment after it, but this isn't
256-supported in general.
257+Items with a fixed number of arguments can be followed by a comment. But only
258+if none of the arguments can contain white space. The comment must start with
259+a "#" character. Example:
260+
261+ KEEPCASE = # fix case for words with this flag ~
262
263
264 ENCODING *spell-SET*
265@@ -965,6 +968,9 @@
266
267 Note: When using utf-8 only characters up to 65000 may be used for flags.
268
269+Note: even when using "num" or "long" the number of flags available to
270+compounding and prefixes is limited to about 250.
271+
272
273 AFFIXES
274 *spell-PFX* *spell-SFX*
275@@ -1178,6 +1184,9 @@
276 The flag also applies to the word with affixes, thus this can be used to mark
277 a whole bunch of related words as bad.
278
279+ *spell-FORBIDDENWORD*
280+FORBIDDENWORD can be used just like BAD. For compatibility with Hunspell.
281+
282 *spell-NEEDAFFIX*
283 The NEEDAFFIX flag is used to require that a word is used with an affix. The
284 word itself is not a good word (unless there is an empty affix). Example:
285@@ -1268,6 +1277,10 @@
286
287 NEEDCOMPOUND & ~
288
289+ *spell-ONLYINCOMPOUND*
290+The ONLYINCOMPOUND does exactly the same as NEEDCOMPOUND. Supported for
291+compatiblity with Hunspell.
292+
293 *spell-COMPOUNDMIN*
294 The minimal character length of a word used for compounding is specified with
295 COMPOUNDMIN. Example:
296@@ -1328,6 +1341,20 @@
297 rules. Can also be used for an affix to count the affix as a compounding
298 word.
299
300+ *spell-CHECKCOMPOUNDPATTERN*
301+CHECKCOMPOUNDPATTERN is used to define patterns that, when matching at the
302+position where two words are compounded together forbids the compound.
303+For example:
304+ CHECKCOMPOUNDPATTERN o e ~
305+
306+This forbids compounding if the first word ends in "o" and the second word
307+starts with "e".
308+
309+The arguments must be plain text, no patterns are actually supported, despite
310+the item name. Case is always ignored.
311+
312+The Hunspell feature to use three arguments and flags is not supported.
313+
314 *spell-SYLLABLE*
315 The SYLLABLE item defines characters or character sequences that are used to
316 count the number of syllables in a word. Example:
317@@ -1496,6 +1523,10 @@
318 ACCENT (Hunspell) *spell-ACCENT*
319 Use MAP instead. |spell-MAP|
320
321+BREAK (Hunspell) *spell-BREAK*
322+ Define break points. Unclear how it works exactly.
323+ Not supported.
324+
325 CHECKCOMPOUNDCASE (Hunspell) *spell-CHECKCOMPOUNDCASE*
326 Disallow uppercase letters at compound word boundaries.
327 Not supported.
328@@ -1512,9 +1543,6 @@
329 Forbid three identical characters when compounding. Not
330 supported.
331
332-CHECKCOMPOUNDPATTERN (Hunspell) *spell-CHECKCOMPOUNDPATTERN*
333- Forbid compounding when patterns match. Not supported.
334-
335 COMPLEXPREFIXES (Hunspell) *spell-COMPLEXPREFIXES*
336 Enables using two prefixes. Not supported.
337
338@@ -1536,13 +1564,18 @@
339 COMPOUNDMIDDLE (Hunspell) *spell-COMPOUNDMIDDLE*
340 Use COMPOUNDRULE instead. |spell-COMPOUNDRULE|
341
342+COMPOUNDRULES (Hunspell) *spell-COMPOUNDRULES*
343+ Number of COMPOUNDRULE lines following. Ignored, but the
344+ argument must be a number.
345+
346 COMPOUNDSYLLABLE (Hunspell) *spell-COMPOUNDSYLLABLE*
347 Use SYLLABLE and COMPOUNDSYLMAX instead. |spell-SYLLABLE|
348 |spell-COMPOUNDSYLMAX|
349
350-FORBIDDENWORD (Hunspell) *spell-FORBIDDENWORD*
351- Use BAD instead. |spell-BAD|
352-
353+KEY (Hunspell) *spell-KEY*
354+ Define characters that are close together on the keyboard.
355+ Used to give better suggestions. Not supported.
356+
357 LANG (Hunspell) *spell-LANG*
358 This specifies language-specific behavior. This actually
359 moves part of the language knowledge into the program,
360@@ -1553,10 +1586,7 @@
361 Only needed for morphological analysis.
362
363 MAXNGRAMSUGS (Hunspell) *spell-MAXNGRAMSUGS*
364- Not supported.
365-
366-ONLYINCOMPOUND (Hunspell) *spell-ONLYINCOMPOUND*
367- Use NEEDCOMPOUND instead. |spell-NEEDCOMPOUND|
368+ Set number of n-gram suggestions. Not supported.
369
370 PSEUDOROOT (Hunspell) *spell-PSEUDOROOT*
371 Use NEEDAFFIX instead. |spell-NEEDAFFIX|
372diff -Naur vim72.orig/runtime/doc/starting.txt vim72/runtime/doc/starting.txt
373--- vim72.orig/runtime/doc/starting.txt 2008-08-09 07:23:00.000000000 -0700
[61a83e8]374+++ vim72/runtime/doc/starting.txt 2009-02-15 23:26:29.520020393 -0800
[76dd250]375@@ -1,4 +1,4 @@
376-*starting.txt* For Vim version 7.2. Last change: 2008 Jun 21
377+*starting.txt* For Vim version 7.2. Last change: 2008 Nov 09
378
379
380 VIM REFERENCE MANUAL by Bram Moolenaar
381@@ -1337,8 +1337,9 @@
382 *viminfo-read*
383 When Vim is started and the 'viminfo' option is non-empty, the contents of
384 the viminfo file are read and the info can be used in the appropriate places.
385-The marks are not read in at startup (but file marks are). See
386-|initialization| for how to set the 'viminfo' option upon startup.
387+The |v:oldfiles| variable is filled. The marks are not read in at startup
388+(but file marks are). See |initialization| for how to set the 'viminfo'
389+option upon startup.
390
391 *viminfo-write*
392 When Vim exits and 'viminfo' is non-empty, the info is stored in the viminfo
393@@ -1372,6 +1373,8 @@
394 that start with any string given with the "r" flag in 'viminfo'. This can be
395 used to avoid saving marks for files on removable media (for MS-DOS you would
396 use "ra:,rb:", for Amiga "rdf0:,rdf1:,rdf2:").
397+The |v:oldfiles| variable is filled with the file names that the viminfo file
398+has marks for.
399
400 *viminfo-file-marks*
401 Uppercase marks ('A to 'Z) are stored when writing the viminfo file. The
402@@ -1463,8 +1466,8 @@
403 *:rv* *:rviminfo* *E195*
404 :rv[iminfo][!] [file] Read from viminfo file [file] (default: see above).
405 If [!] is given, then any information that is
406- already set (registers, marks, etc.) will be
407- overwritten. {not in Vi}
408+ already set (registers, marks, |v:oldfiles|, etc.)
409+ will be overwritten {not in Vi}
410
411 *:wv* *:wviminfo* *E137* *E138* *E574*
412 :wv[iminfo][!] [file] Write to viminfo file [file] (default: see above).
413@@ -1479,4 +1482,20 @@
414 the .viminfo file.
415 {not in Vi}
416
417+ *:ol* *:oldfiles*
418+:ol[dfiles] List the files that have marks stored in the viminfo
419+ file. This list is read on startup and only changes
420+ afterwards with ":rviminfo!". Also see |v:oldfiles|.
421+ The number can be used with |c_#<|.
422+ {not in Vi, only when compiled with the +eval feature}
423+
424+:bro[wse] ol[dfiles][!]
425+ List file names as with |:oldfiles|, and then prompt
426+ for a number. When the number is valid that file from
427+ the list is edited.
428+ If you get the |press-enter| prompt you can press "q"
429+ and still get the prompt to enter a file number.
430+ Use ! to abondon a modified buffer. |abandon|
431+ {not when compiled with tiny or small features}
432+
433 vim:tw=78:ts=8:ft=help:norl:
434diff -Naur vim72.orig/runtime/doc/usr_21.txt vim72/runtime/doc/usr_21.txt
435--- vim72.orig/runtime/doc/usr_21.txt 2008-08-09 07:23:01.000000000 -0700
[61a83e8]436+++ vim72/runtime/doc/usr_21.txt 2009-02-15 23:26:29.520020393 -0800
[76dd250]437@@ -1,4 +1,4 @@
438-*usr_21.txt* For Vim version 7.2. Last change: 2007 May 01
439+*usr_21.txt* For Vim version 7.2. Last change: 2008 Nov 09
440
441 VIM USER MANUAL - by Bram Moolenaar
442
443@@ -153,7 +153,7 @@
444 to be lost. Each item can be remembered only once.
445
446
447-GETTING BACK TO WHERE YOU WERE
448+GETTING BACK TO WHERE YOU STOPPED VIM
449
450 You are halfway editing a file and it's time to leave for holidays. You exit
451 Vim and go enjoy yourselves, forgetting all about your work. After a couple
452@@ -168,6 +168,48 @@
453 The |:marks| command is useful to find out where '0 to '9 will take you.
454
455
456+GETTING BACK TO SOME FILE
457+
458+If you want to go back to a file that you edited recently, but not when
459+exiting Vim, there is a slightly more complicated way. You can see a list of
460+files by typing the command: >
461+
462+ :oldfiles
463+< 1: ~/.viminfo ~
464+ 2: ~/text/resume.txt ~
465+ 3: /tmp/draft ~
466+
467+Now you would like to edit the second file, which is in the list preceded by
468+"2:". You type: >
469+
470+ :e #<2
471+
472+Instead of ":e" you can use any command that has a file name argument, the
473+"#<2" item works in the same place as "%" (current file name) and "#"
474+(alternate file name). So you can also split the window to edit the third
475+file: >
476+
477+ :split #<3
478+
479+That #<123 thing is a bit complicated when you just want to edit a file.
480+Fortunately there is a simpler way: >
481+
482+ :browse oldfiles
483+< 1: ~/.viminfo ~
484+ 2: ~/text/resume.txt ~
485+ 3: /tmp/draft ~
486+ -- More --
487+
488+You get the same list of files as with |:oldfiles|. If you want to edit
489+"resume.txt" first press "q" to stop the listing. You will get a prompt:
490+
491+ Type number and <Enter> (empty cancels): ~
492+
493+Type "2" and press <Enter> to edit the second file.
494+
495+More info at |:oldfiles|, |v:oldfiles| and |c_#<|.
496+
497+
498 MOVE INFO FROM ONE VIM TO ANOTHER
499
500 You can use the ":wviminfo" and ":rviminfo" commands to save and restore the
501diff -Naur vim72.orig/runtime/scripts.vim vim72/runtime/scripts.vim
502--- vim72.orig/runtime/scripts.vim 2008-08-08 15:27:21.000000000 -0700
[61a83e8]503+++ vim72/runtime/scripts.vim 2009-02-15 23:25:14.879235088 -0800
[76dd250]504@@ -234,6 +234,10 @@
505 elseif s:line1 =~ '\<DTD\s\+XHTML\s'
506 set ft=xhtml
507
508+ " HTML (e.g.: <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN")
509+ elseif s:line1 =~? '\<DOCTYPE\s\+html\>'
510+ set ft=html
511+
512 " PDF
513 elseif s:line1 =~ '^%PDF-'
514 set ft=pdf
515diff -Naur vim72.orig/src/auto/configure vim72/src/auto/configure
516--- vim72.orig/src/auto/configure 2008-07-24 05:40:36.000000000 -0700
[61a83e8]517+++ vim72/src/auto/configure 2009-02-15 23:27:04.022228523 -0800
[76dd250]518@@ -16819,21 +16819,29 @@
519 LDFLAGS="$LDFLAGS -isysroot /Developer/SDKs/MacOSX10.4u.sdk -arch i386 -arch ppc"
520 fi
521
522-{ $as_echo "$as_me:$LINENO: checking for GCC 3 or later" >&5
523-$as_echo_n "checking for GCC 3 or later... " >&6; }
524 DEPEND_CFLAGS_FILTER=
525 if test "$GCC" = yes; then
526+ { $as_echo "$as_me:$LINENO: checking for GCC 3 or later" >&5
527+$as_echo_n "checking for GCC 3 or later... " >&6; }
528 gccmajor=`echo "$gccversion" | sed -e 's/^\([1-9]\)\..*$/\1/g'`
529 if test "$gccmajor" -gt "2"; then
530 DEPEND_CFLAGS_FILTER="| sed 's+-I */+-isystem /+g'"
531- fi
532-fi
533-if test "$DEPEND_CFLAGS_FILTER" = ""; then
534- { $as_echo "$as_me:$LINENO: result: no" >&5
535+ { $as_echo "$as_me:$LINENO: result: yes" >&5
536+$as_echo "yes" >&6; }
537+ else
538+ { $as_echo "$as_me:$LINENO: result: no" >&5
539 $as_echo "no" >&6; }
540-else
541- { $as_echo "$as_me:$LINENO: result: yes" >&5
542+ fi
543+ { $as_echo "$as_me:$LINENO: checking whether we need -D_FORTIFY_SOURCE=1" >&5
544+$as_echo_n "checking whether we need -D_FORTIFY_SOURCE=1... " >&6; }
545+ if test "$gccmajor" -gt "3"; then
546+ CFLAGS="$CFLAGS -D_FORTIFY_SOURCE=1"
547+ { $as_echo "$as_me:$LINENO: result: yes" >&5
548 $as_echo "yes" >&6; }
549+ else
550+ { $as_echo "$as_me:$LINENO: result: no" >&5
551+$as_echo "no" >&6; }
552+ fi
553 fi
554
555
556diff -Naur vim72.orig/src/buffer.c vim72/src/buffer.c
557--- vim72.orig/src/buffer.c 2008-08-06 04:00:48.000000000 -0700
[61a83e8]558+++ vim72/src/buffer.c 2009-02-15 23:28:48.044895935 -0800
[43c52a1]559@@ -437,10 +437,6 @@
560 return;
561 #endif
562
563-#ifdef FEAT_NETBEANS_INTG
564- if (usingNetbeans)
565- netbeans_file_closed(buf);
566-#endif
567 /* Change directories when the 'acd' option is set. */
568 DO_AUTOCHDIR
569
570@@ -639,6 +635,10 @@
571 #ifdef FEAT_SIGNS
572 buf_delete_signs(buf); /* delete any signs */
573 #endif
574+#ifdef FEAT_NETBEANS_INTG
575+ if (usingNetbeans)
576+ netbeans_file_killed(buf);
577+#endif
578 #ifdef FEAT_LOCALMAP
579 map_clear_int(buf, MAP_ALL_MODES, TRUE, FALSE); /* clear local mappings */
580 map_clear_int(buf, MAP_ALL_MODES, TRUE, TRUE); /* clear local abbrevs */
[76dd250]581@@ -647,6 +647,9 @@
582 vim_free(buf->b_start_fenc);
583 buf->b_start_fenc = NULL;
584 #endif
585+#ifdef FEAT_SPELL
586+ ga_clear(&buf->b_langp);
587+#endif
588 }
589
590 /*
[43c52a1]591@@ -812,9 +815,6 @@
592 int bnr; /* buffer number */
593 char_u *p;
594
595-#ifdef FEAT_NETBEANS_INTG
596- netbeansCloseFile = 1;
597-#endif
598 if (addr_count == 0)
599 {
600 (void)do_buffer(command, DOBUF_CURRENT, FORWARD, 0, forceit);
601@@ -909,9 +909,6 @@
602 }
603 }
604
605-#ifdef FEAT_NETBEANS_INTG
606- netbeansCloseFile = 0;
607-#endif
608
609 return errormsg;
610 }
611@@ -1237,7 +1234,7 @@
[76dd250]612 * "buf" if one exists */
613 if ((swb_flags & SWB_USEOPEN) && buf_jump_open_win(buf))
614 return OK;
615- /* If 'switchbuf' contians "usetab": jump to first window in any tab
616+ /* If 'switchbuf' contains "usetab": jump to first window in any tab
617 * page containing "buf" if one exists */
618 if ((swb_flags & SWB_USETAB) && buf_jump_open_tab(buf))
619 return OK;
[43c52a1]620@@ -1351,11 +1348,12 @@
[76dd250]621 }
622 }
623 #ifdef FEAT_AUTOCMD
624+ /* An autocommand may have deleted "buf", already entered it (e.g., when
625+ * it did ":bunload") or aborted the script processing! */
626 # ifdef FEAT_EVAL
627- /* An autocommand may have deleted buf or aborted the script processing! */
628- if (buf_valid(buf) && !aborting())
629+ if (buf_valid(buf) && buf != curbuf && !aborting())
630 # else
631- if (buf_valid(buf)) /* an autocommand may have deleted buf! */
632+ if (buf_valid(buf) && buf != curbuf)
633 # endif
634 #endif
635 enter_buffer(buf);
[43c52a1]636@@ -1397,6 +1395,9 @@
[76dd250]637 curwin->w_cursor.coladd = 0;
638 #endif
639 curwin->w_set_curswant = TRUE;
640+#ifdef FEAT_AUTOCMD
641+ curwin->w_topline_was_set = FALSE;
642+#endif
643
644 /* Make sure the buffer is loaded. */
645 if (curbuf->b_ml.ml_mfp == NULL) /* need to load the file */
[43c52a1]646@@ -1436,7 +1437,8 @@
[76dd250]647 maketitle();
648 #endif
649 #ifdef FEAT_AUTOCMD
650- if (curwin->w_topline == 1) /* when autocmds didn't change it */
651+ /* when autocmds didn't change it */
652+ if (curwin->w_topline == 1 && !curwin->w_topline_was_set)
653 #endif
654 scroll_cursor_halfway(FALSE); /* redisplay at correct position */
655
[43c52a1]656@@ -3963,7 +3965,7 @@
[76dd250]657 width = vim_strsize(out);
658 if (maxwidth > 0 && width > maxwidth)
659 {
660- /* Result is too long, must trunctate somewhere. */
661+ /* Result is too long, must truncate somewhere. */
662 l = 0;
663 if (itemcnt == 0)
664 s = out;
[43c52a1]665@@ -5062,7 +5064,7 @@
[76dd250]666 {
667 if (buf->b_sfname != NULL)
668 return (char *)buf->b_sfname;
669- return "[Scratch]";
670+ return _("[Scratch]");
671 }
672 #endif
673 if (buf->b_fname == NULL)
674diff -Naur vim72.orig/src/configure.in vim72/src/configure.in
675--- vim72.orig/src/configure.in 2008-07-24 05:40:26.000000000 -0700
[61a83e8]676+++ vim72/src/configure.in 2009-02-15 23:27:04.022228523 -0800
[76dd250]677@@ -3152,18 +3152,25 @@
678 dnl But only when making dependencies, cproto and lint don't take "-isystem".
679 dnl Mac gcc returns "powerpc-apple-darwin8-gcc-4.0.1 (GCC)...", need to allow
680 dnl the number before the version number.
681-AC_MSG_CHECKING(for GCC 3 or later)
682 DEPEND_CFLAGS_FILTER=
683 if test "$GCC" = yes; then
684+ AC_MSG_CHECKING(for GCC 3 or later)
685 gccmajor=`echo "$gccversion" | sed -e 's/^\([[1-9]]\)\..*$/\1/g'`
686 if test "$gccmajor" -gt "2"; then
687 DEPEND_CFLAGS_FILTER="| sed 's+-I */+-isystem /+g'"
688+ AC_MSG_RESULT(yes)
689+ else
690+ AC_MSG_RESULT(no)
691+ fi
692+ dnl -D_FORTIFY_SOURCE=2 crashes Vim on strcpy(buf, "000") when buf is
693+ dnl declared as char x[1] but actually longer. Introduced in gcc 4.0.
694+ AC_MSG_CHECKING(whether we need -D_FORTIFY_SOURCE=1)
695+ if test "$gccmajor" -gt "3"; then
696+ CFLAGS="$CFLAGS -D_FORTIFY_SOURCE=1"
697+ AC_MSG_RESULT(yes)
698+ else
699+ AC_MSG_RESULT(no)
700 fi
701-fi
702-if test "$DEPEND_CFLAGS_FILTER" = ""; then
703- AC_MSG_RESULT(no)
704-else
705- AC_MSG_RESULT(yes)
706 fi
707 AC_SUBST(DEPEND_CFLAGS_FILTER)
708
709diff -Naur vim72.orig/src/diff.c vim72/src/diff.c
710--- vim72.orig/src/diff.c 2008-03-05 03:16:56.000000000 -0800
[61a83e8]711+++ vim72/src/diff.c 2009-02-15 23:29:07.186120966 -0800
[5f4a45c9]712@@ -8,7 +8,7 @@
713 */
714
715 /*
716- * diff.c: code for diff'ing two or three buffers.
717+ * diff.c: code for diff'ing two, three or four buffers.
718 */
719
720 #include "vim.h"
[76dd250]721@@ -73,6 +73,8 @@
722 {
723 tp->tp_diffbuf[i] = NULL;
724 tp->tp_diff_invalid = TRUE;
725+ if (tp == curtab)
726+ diff_redraw(TRUE);
727 }
728 }
729 }
730@@ -102,6 +104,7 @@
731 {
732 curtab->tp_diffbuf[i] = NULL;
733 curtab->tp_diff_invalid = TRUE;
734+ diff_redraw(TRUE);
735 }
736 }
737 }
[5f4a45c9]738@@ -113,7 +116,7 @@
739 * Add a buffer to make diffs for.
740 * Call this when a new buffer is being edited in the current window where
741 * 'diff' is set.
742- * Marks the current buffer as being part of the diff and requireing updating.
743+ * Marks the current buffer as being part of the diff and requiring updating.
744 * This must be done before any autocmd, because a command may use info
745 * about the screen contents.
746 */
[76dd250]747@@ -131,6 +134,7 @@
748 {
749 curtab->tp_diffbuf[i] = buf;
750 curtab->tp_diff_invalid = TRUE;
751+ diff_redraw(TRUE);
752 return;
753 }
754
755@@ -661,6 +665,7 @@
756 char_u *tmp_diff;
757 FILE *fd;
758 int ok;
759+ int io_error = FALSE;
760
761 /* Delete all diffblocks. */
762 diff_clear(curtab);
763@@ -697,18 +702,26 @@
764 {
765 ok = FALSE;
766 fd = mch_fopen((char *)tmp_orig, "w");
767- if (fd != NULL)
768+ if (fd == NULL)
769+ io_error = TRUE;
770+ else
771 {
772- fwrite("line1\n", (size_t)6, (size_t)1, fd);
773+ if (fwrite("line1\n", (size_t)6, (size_t)1, fd) != 1)
774+ io_error = TRUE;
775 fclose(fd);
776 fd = mch_fopen((char *)tmp_new, "w");
777- if (fd != NULL)
778+ if (fd == NULL)
779+ io_error = TRUE;
780+ else
781 {
782- fwrite("line2\n", (size_t)6, (size_t)1, fd);
783+ if (fwrite("line2\n", (size_t)6, (size_t)1, fd) != 1)
784+ io_error = TRUE;
785 fclose(fd);
786 diff_file(tmp_orig, tmp_new, tmp_diff);
787 fd = mch_fopen((char *)tmp_diff, "r");
788- if (fd != NULL)
789+ if (fd == NULL)
790+ io_error = TRUE;
791+ else
792 {
793 char_u linebuf[LBUFLEN];
794
795@@ -761,6 +774,8 @@
796 }
797 if (!ok)
798 {
799+ if (io_error)
800+ EMSG(_("E810: Cannot read or write temp files"));
801 EMSG(_("E97: Cannot create diffs"));
802 diff_a_works = MAYBE;
803 #if defined(MSWIN) || defined(MSDOS)
[5f4a45c9]804@@ -914,7 +929,7 @@
805 goto theend;
806
807 #ifdef UNIX
808- /* Temporaraly chdir to /tmp, to avoid patching files in the current
809+ /* Temporarily chdir to /tmp, to avoid patching files in the current
810 * directory when the patch file contains more than one patch. When we
811 * have our own temp dir use that instead, it will be cleaned up when we
812 * exit (any .rej files created). Don't change directory if we can't
[76dd250]813@@ -925,10 +940,10 @@
814 {
815 # ifdef TEMPDIRNAMES
816 if (vim_tempdir != NULL)
817- mch_chdir((char *)vim_tempdir);
818+ ignored = mch_chdir((char *)vim_tempdir);
819 else
820 # endif
821- mch_chdir("/tmp");
822+ ignored = mch_chdir("/tmp");
823 shorten_fnames(TRUE);
824 }
825 #endif
[5f4a45c9]826@@ -2114,6 +2129,8 @@
827 EMSG2(_("E102: Can't find buffer \"%s\""), eap->arg);
828 return;
829 }
830+ if (buf == curbuf)
831+ return; /* nothing to do */
832 idx_other = diff_buf_idx(buf);
833 if (idx_other == DB_COUNT)
834 {
[7352c10]835diff -Naur vim72.orig/src/edit.c vim72/src/edit.c
836--- vim72.orig/src/edit.c 2008-08-06 05:51:17.000000000 -0700
[61a83e8]837+++ vim72/src/edit.c 2009-02-15 23:29:31.179660846 -0800
[7352c10]838@@ -147,6 +147,7 @@
839 static int ins_compl_bs __ARGS((void));
840 static void ins_compl_new_leader __ARGS((void));
841 static void ins_compl_addleader __ARGS((int c));
842+static int ins_compl_len __ARGS((void));
843 static void ins_compl_restart __ARGS((void));
844 static void ins_compl_set_original_text __ARGS((char_u *str));
845 static void ins_compl_addfrommatch __ARGS((void));
846@@ -197,7 +198,8 @@
847 static void mb_replace_pop_ins __ARGS((int cc));
848 #endif
849 static void replace_flush __ARGS((void));
850-static void replace_do_bs __ARGS((void));
851+static void replace_do_bs __ARGS((int limit_col));
852+static int del_char_after_col __ARGS((int limit_col));
853 #ifdef FEAT_CINDENT
854 static int cindent_on __ARGS((void));
855 #endif
856@@ -1933,6 +1935,8 @@
857 /*
858 * Backspace the cursor until the given column. Handles REPLACE and VREPLACE
859 * modes correctly. May also be used when not in insert mode at all.
860+ * Will attempt not to go before "col" even when there is a composing
861+ * character.
862 */
863 void
864 backspace_until_column(col)
[9a875fd]865@@ -1942,13 +1946,50 @@
[7352c10]866 {
867 curwin->w_cursor.col--;
868 if (State & REPLACE_FLAG)
869- replace_do_bs();
870- else
871- (void)del_char(FALSE);
872+ replace_do_bs(col);
873+ else if (!del_char_after_col(col))
874+ break;
875 }
876 }
877 #endif
878
879+/*
880+ * Like del_char(), but make sure not to go before column "limit_col".
881+ * Only matters when there are composing characters.
882+ * Return TRUE when something was deleted.
883+ */
[9a875fd]884+/*ARGSUSED*/
[7352c10]885+ static int
886+del_char_after_col(limit_col)
887+ int limit_col;
888+{
889+#ifdef FEAT_MBYTE
890+ if (enc_utf8 && limit_col >= 0)
891+ {
892+ int ecol = curwin->w_cursor.col + 1;
893+
894+ /* Make sure the cursor is at the start of a character, but
895+ * skip forward again when going too far back because of a
896+ * composing character. */
897+ mb_adjust_cursor();
[9a875fd]898+ while (curwin->w_cursor.col < (colnr_T)limit_col)
[7352c10]899+ {
900+ int l = utf_ptr2len(ml_get_cursor());
901+
902+ if (l == 0) /* end of line */
903+ break;
904+ curwin->w_cursor.col += l;
905+ }
906+ if (*ml_get_cursor() == NUL || curwin->w_cursor.col == ecol)
907+ return FALSE;
908+ del_bytes((long)(ecol - curwin->w_cursor.col), FALSE, TRUE);
909+ }
910+ else
911+#endif
912+ (void)del_char(FALSE);
913+ return TRUE;
914+}
915+
916 #if defined(FEAT_INS_EXPAND) || defined(PROTO)
917 /*
918 * CTRL-X pressed in Insert mode.
[9a875fd]919@@ -2418,7 +2459,7 @@
[7352c10]920 {
921 had_match = (curwin->w_cursor.col > compl_col);
922 ins_compl_delete();
923- ins_bytes(compl_leader + curwin->w_cursor.col - compl_col);
924+ ins_bytes(compl_leader + ins_compl_len());
925 ins_redraw(FALSE);
926
927 /* When the match isn't there (to avoid matching itself) remove it
[9a875fd]928@@ -2470,7 +2511,7 @@
[7352c10]929 *p = NUL;
930 had_match = (curwin->w_cursor.col > compl_col);
931 ins_compl_delete();
932- ins_bytes(compl_leader + curwin->w_cursor.col - compl_col);
933+ ins_bytes(compl_leader + ins_compl_len());
934 ins_redraw(FALSE);
935
936 /* When the match isn't there (to avoid matching itself) remove it
[9a875fd]937@@ -3209,7 +3250,7 @@
[7352c10]938 {
939 ins_compl_del_pum();
940 ins_compl_delete();
941- ins_bytes(compl_leader + curwin->w_cursor.col - compl_col);
942+ ins_bytes(compl_leader + ins_compl_len());
943 compl_used_match = FALSE;
944
945 if (compl_started)
[9a875fd]946@@ -3264,6 +3305,20 @@
[7352c10]947 }
948
949 /*
950+ * Return the length of the completion, from the completion start column to
951+ * the cursor column. Making sure it never goes below zero.
952+ */
953+ static int
954+ins_compl_len()
955+{
956+ int off = curwin->w_cursor.col - compl_col;
957+
958+ if (off < 0)
959+ return 0;
960+ return off;
961+}
962+
963+/*
964 * Append one character to the match leader. May reduce the number of
965 * matches.
966 */
[9a875fd]967@@ -3621,10 +3676,9 @@
[7352c10]968 {
969 ins_compl_delete();
970 if (compl_leader != NULL)
971- ins_bytes(compl_leader + curwin->w_cursor.col - compl_col);
972+ ins_bytes(compl_leader + ins_compl_len());
973 else if (compl_first_match != NULL)
974- ins_bytes(compl_orig_text
975- + curwin->w_cursor.col - compl_col);
976+ ins_bytes(compl_orig_text + ins_compl_len());
977 retval = TRUE;
978 }
979
[9a875fd]980@@ -4187,7 +4241,7 @@
981 }
982
983 /* check if compl_curr_match has changed, (e.g. other type of
984- * expansion added somenthing) */
985+ * expansion added something) */
986 if (type != 0 && compl_curr_match != old_match)
987 found_new_match = OK;
988
989@@ -4256,7 +4310,7 @@
[7352c10]990 static void
991 ins_compl_insert()
992 {
993- ins_bytes(compl_shown_match->cp_str + curwin->w_cursor.col - compl_col);
994+ ins_bytes(compl_shown_match->cp_str + ins_compl_len());
995 if (compl_shown_match->cp_flags & ORIGINAL_TEXT)
996 compl_used_match = FALSE;
997 else
[9a875fd]998@@ -4425,7 +4479,7 @@
[7352c10]999 if (!compl_get_longest || compl_used_match)
1000 ins_compl_insert();
1001 else
1002- ins_bytes(compl_leader + curwin->w_cursor.col - compl_col);
1003+ ins_bytes(compl_leader + ins_compl_len());
1004 }
1005 else
1006 compl_used_match = FALSE;
[9a875fd]1007@@ -4688,7 +4742,7 @@
1008 }
1009 compl_length = curwin->w_cursor.col - (int)compl_col;
1010 /* IObuff is used to add a "word from the next line" would we
1011- * have enough space? just being paranoic */
1012+ * have enough space? just being paranoid */
1013 #define MIN_SPACE 75
1014 if (compl_length > (IOSIZE - MIN_SPACE))
1015 {
1016@@ -7123,9 +7177,12 @@
[7352c10]1017 * cc == 0: character was inserted, delete it
1018 * cc > 0: character was replaced, put cc (first byte of original char) back
1019 * and check for more characters to be put back
1020+ * When "limit_col" is >= 0, don't delete before this column. Matters when
1021+ * using composing characters, use del_char_after_col() instead of del_char().
1022 */
1023 static void
1024-replace_do_bs()
1025+replace_do_bs(limit_col)
1026+ int limit_col;
1027 {
1028 int cc;
1029 #ifdef FEAT_VREPLACE
[9a875fd]1030@@ -7153,7 +7210,7 @@
[7352c10]1031 #ifdef FEAT_MBYTE
1032 if (has_mbyte)
1033 {
1034- del_char(FALSE);
1035+ (void)del_char_after_col(limit_col);
1036 # ifdef FEAT_VREPLACE
1037 if (State & VREPLACE_FLAG)
1038 orig_len = (int)STRLEN(ml_get_cursor());
[9a875fd]1039@@ -7203,7 +7260,7 @@
[7352c10]1040 changed_bytes(curwin->w_cursor.lnum, curwin->w_cursor.col);
1041 }
1042 else if (cc == 0)
1043- (void)del_char(FALSE);
1044+ (void)del_char_after_col(limit_col);
1045 }
1046
1047 #ifdef FEAT_CINDENT
[9a875fd]1048@@ -8150,7 +8207,7 @@
1049 /*
1050 * If the cursor is on an indent, ^T/^D insert/delete one
1051 * shiftwidth. Otherwise ^T/^D behave like a "<<" or ">>".
1052- * Always round the indent to 'shiftwith', this is compatible
1053+ * Always round the indent to 'shiftwidth', this is compatible
1054 * with vi. But vi only supports ^T and ^D after an
1055 * autoindent, we support it everywhere.
1056 */
1057@@ -8239,7 +8296,7 @@
[7352c10]1058 * Replace mode */
1059 if (curwin->w_cursor.lnum != Insstart.lnum
1060 || curwin->w_cursor.col >= Insstart.col)
1061- replace_do_bs();
1062+ replace_do_bs(-1);
1063 }
1064 else
1065 (void)del_char(FALSE);
[9a875fd]1066@@ -8556,7 +8613,7 @@
[7352c10]1067 break;
1068 }
1069 if (State & REPLACE_FLAG)
1070- replace_do_bs();
1071+ replace_do_bs(-1);
1072 else
1073 {
1074 #ifdef FEAT_MBYTE
[76dd250]1075diff -Naur vim72.orig/src/eval.c vim72/src/eval.c
1076--- vim72.orig/src/eval.c 2008-08-07 12:37:22.000000000 -0700
[61a83e8]1077+++ vim72/src/eval.c 2009-02-15 23:29:43.448444754 -0800
[1f22c7c]1078@@ -32,6 +32,9 @@
1079
1080 #define DICT_MAXNEST 100 /* maximum nesting of lists and dicts */
1081
1082+#define DO_NOT_FREE_CNT 99999 /* refcount for dict or list that should not
1083+ be freed. */
1084+
1085 /*
1086 * In a hashtab item "hi_key" points to "di_key" in a dictitem.
1087 * This avoids adding a pointer to the hashtab item.
1088@@ -348,6 +351,7 @@
[76dd250]1089 {VV_NAME("mouse_col", VAR_NUMBER), 0},
1090 {VV_NAME("operator", VAR_STRING), VV_RO},
1091 {VV_NAME("searchforward", VAR_NUMBER), 0},
1092+ {VV_NAME("oldfiles", VAR_LIST), 0},
1093 };
1094
1095 /* shorthand */
[1f22c7c]1096@@ -355,6 +359,7 @@
[76dd250]1097 #define vv_nr vv_di.di_tv.vval.v_number
1098 #define vv_float vv_di.di_tv.vval.v_float
1099 #define vv_str vv_di.di_tv.vval.v_string
1100+#define vv_list vv_di.di_tv.vval.v_list
1101 #define vv_tv vv_di.di_tv
1102
1103 /*
[1f22c7c]1104@@ -426,7 +431,6 @@
[76dd250]1105 static long list_idx_of_item __ARGS((list_T *l, listitem_T *item));
1106 static void list_append __ARGS((list_T *l, listitem_T *item));
1107 static int list_append_tv __ARGS((list_T *l, typval_T *tv));
1108-static int list_append_string __ARGS((list_T *l, char_u *str, int len));
1109 static int list_append_number __ARGS((list_T *l, varnumber_T n));
1110 static int list_insert_tv __ARGS((list_T *l, typval_T *tv, listitem_T *item));
1111 static int list_extend __ARGS((list_T *l1, list_T *l2, listitem_T *bef));
[1f22c7c]1112@@ -788,6 +792,8 @@
1113 static void func_unref __ARGS((char_u *name));
1114 static void func_ref __ARGS((char_u *name));
1115 static void call_user_func __ARGS((ufunc_T *fp, int argcount, typval_T *argvars, typval_T *rettv, linenr_T firstline, linenr_T lastline, dict_T *selfdict));
1116+static int can_free_funccal __ARGS((funccall_T *fc, int copyID)) ;
1117+static void free_funccal __ARGS((funccall_T *fc, int free_val));
1118 static void add_nr_var __ARGS((dict_T *dp, dictitem_T *v, char *name, varnumber_T nr));
1119 static win_T *find_win_by_nr __ARGS((typval_T *vp, tabpage_T *tp));
1120 static void getwinvar __ARGS((typval_T *argvars, typval_T *rettv, int off));
1121@@ -845,11 +851,17 @@
[76dd250]1122 p = &vimvars[i];
1123 if (p->vv_di.di_tv.v_type == VAR_STRING)
1124 {
1125- vim_free(p->vv_di.di_tv.vval.v_string);
1126- p->vv_di.di_tv.vval.v_string = NULL;
1127+ vim_free(p->vv_str);
1128+ p->vv_str = NULL;
1129+ }
1130+ else if (p->vv_di.di_tv.v_type == VAR_LIST)
1131+ {
1132+ list_unref(p->vv_list);
1133+ p->vv_list = NULL;
1134 }
1135 }
1136 hash_clear(&vimvarht);
1137+ hash_init(&vimvarht); /* garbage_collect() will access it */
1138 hash_clear(&compat_hashtab);
1139
1140 /* script-local variables */
[1f22c7c]1141@@ -916,6 +928,10 @@
1142 /* pointer to funccal for currently active function */
1143 funccall_T *current_funccal = NULL;
1144
1145+/* pointer to list of previously used funccal, still around because some
1146+ * item in it is still being used. */
1147+funccall_T *previous_funccal = NULL;
1148+
1149 /*
1150 * Return TRUE when a function was ended by a ":return" command.
1151 */
1152@@ -1256,23 +1272,26 @@
[76dd250]1153
1154 /*
1155 * Top level evaluation function, returning a string.
1156+ * When "convert" is TRUE convert a List into a sequence of lines and convert
1157+ * a Float to a String.
1158 * Return pointer to allocated memory, or NULL for failure.
1159 */
1160 char_u *
1161-eval_to_string(arg, nextcmd, dolist)
1162+eval_to_string(arg, nextcmd, convert)
1163 char_u *arg;
1164 char_u **nextcmd;
1165- int dolist; /* turn List into sequence of lines */
1166+ int convert;
1167 {
1168 typval_T tv;
1169 char_u *retval;
1170 garray_T ga;
1171+ char_u numbuf[NUMBUFLEN];
1172
1173 if (eval0(arg, &tv, nextcmd, TRUE) == FAIL)
1174 retval = NULL;
1175 else
1176 {
1177- if (dolist && tv.v_type == VAR_LIST)
1178+ if (convert && tv.v_type == VAR_LIST)
1179 {
1180 ga_init2(&ga, (int)sizeof(char), 80);
1181 if (tv.vval.v_list != NULL)
[1f22c7c]1182@@ -1280,6 +1299,13 @@
[76dd250]1183 ga_append(&ga, NUL);
1184 retval = (char_u *)ga.ga_data;
1185 }
1186+#ifdef FEAT_FLOAT
1187+ else if (convert && tv.v_type == VAR_FLOAT)
1188+ {
1189+ vim_snprintf((char *)numbuf, NUMBUFLEN, "%g", tv.vval.v_float);
1190+ retval = vim_strsave(numbuf);
1191+ }
1192+#endif
1193 else
1194 retval = vim_strsave(get_tv_string(&tv));
1195 clear_tv(&tv);
[1f22c7c]1196@@ -3277,7 +3303,7 @@
[76dd250]1197
1198 if (*startarg != '(')
1199 {
1200- EMSG2(_("E107: Missing braces: %s"), eap->arg);
1201+ EMSG2(_("E107: Missing parentheses: %s"), eap->arg);
1202 goto end;
1203 }
1204
[1f22c7c]1205@@ -3657,8 +3683,8 @@
[76dd250]1206 }
1207
1208 /*
1209- * Return TRUE if typeval "tv" is locked: Either tha value is locked itself or
1210- * it refers to a List or Dictionary that is locked.
1211+ * Return TRUE if typeval "tv" is locked: Either that value is locked itself
1212+ * or it refers to a List or Dictionary that is locked.
1213 */
1214 static int
1215 tv_islocked(tv)
[9a875fd]1216@@ -3902,7 +3928,7 @@
1217
1218 /*
1219 * Handle top level expression:
1220- * expr1 ? expr0 : expr0
1221+ * expr2 ? expr1 : expr1
1222 *
1223 * "arg" must point to the first non-white of the expression.
1224 * "arg" is advanced to the next non-white after the recognized expression.
[1f22c7c]1225@@ -6047,6 +6073,25 @@
[76dd250]1226 }
1227
1228 /*
1229+ * Get list item "l[idx - 1]" as a string. Returns NULL for failure.
1230+ */
1231+ char_u *
1232+list_find_str(l, idx)
1233+ list_T *l;
1234+ long idx;
1235+{
1236+ listitem_T *li;
1237+
1238+ li = list_find(l, idx - 1);
1239+ if (li == NULL)
1240+ {
1241+ EMSGN(_(e_listidx), idx);
1242+ return NULL;
1243+ }
1244+ return get_tv_string(&li->li_tv);
1245+}
1246+
1247+/*
1248 * Locate "item" list "l" and return its index.
1249 * Returns -1 when "item" is not in the list.
1250 */
[1f22c7c]1251@@ -6137,7 +6182,7 @@
[76dd250]1252 * When "len" >= 0 use "str[len]".
1253 * Returns FAIL when out of memory.
1254 */
1255- static int
1256+ int
1257 list_append_string(l, str, len)
1258 list_T *l;
1259 char_u *str;
[1f22c7c]1260@@ -6454,7 +6499,7 @@
1261 buf_T *buf;
1262 win_T *wp;
1263 int i;
1264- funccall_T *fc;
1265+ funccall_T *fc, **pfc;
1266 int did_free = FALSE;
1267 #ifdef FEAT_WINDOWS
1268 tabpage_T *tp;
1269@@ -6497,6 +6542,9 @@
[76dd250]1270 set_ref_in_ht(&fc->l_avars.dv_hashtab, copyID);
1271 }
1272
1273+ /* v: vars */
1274+ set_ref_in_ht(&vimvarht, copyID);
1275+
1276 /*
1277 * 2. Go through the list of dicts and free items without the copyID.
1278 */
[1f22c7c]1279@@ -6535,6 +6583,20 @@
1280 else
1281 ll = ll->lv_used_next;
1282
1283+ /* check if any funccal can be freed now */
1284+ for (pfc = &previous_funccal; *pfc != NULL; )
1285+ {
1286+ if (can_free_funccal(*pfc, copyID))
1287+ {
1288+ fc = *pfc;
1289+ *pfc = fc->caller;
1290+ free_funccal(fc, TRUE);
1291+ did_free = TRUE;
1292+ }
1293+ else
1294+ pfc = &(*pfc)->caller;
1295+ }
1296+
1297 return did_free;
1298 }
1299
1300@@ -6587,7 +6649,7 @@
[76dd250]1301 {
1302 case VAR_DICT:
1303 dd = tv->vval.v_dict;
1304- if (dd->dv_copyID != copyID)
1305+ if (dd != NULL && dd->dv_copyID != copyID)
1306 {
1307 /* Didn't see this dict yet. */
1308 dd->dv_copyID = copyID;
[1f22c7c]1309@@ -6597,7 +6659,7 @@
[76dd250]1310
1311 case VAR_LIST:
1312 ll = tv->vval.v_list;
1313- if (ll->lv_copyID != copyID)
1314+ if (ll != NULL && ll->lv_copyID != copyID)
1315 {
1316 /* Didn't see this list yet. */
1317 ll->lv_copyID = copyID;
[1f22c7c]1318@@ -7525,8 +7587,8 @@
[76dd250]1319 {"getwinposx", 0, 0, f_getwinposx},
1320 {"getwinposy", 0, 0, f_getwinposy},
1321 {"getwinvar", 2, 2, f_getwinvar},
1322- {"glob", 1, 1, f_glob},
1323- {"globpath", 2, 2, f_globpath},
1324+ {"glob", 1, 2, f_glob},
1325+ {"globpath", 2, 3, f_globpath},
1326 {"has", 1, 1, f_has},
1327 {"has_key", 2, 2, f_has_key},
1328 {"haslocaldir", 0, 0, f_haslocaldir},
[5f4a45c9]1329@@ -7856,9 +7918,9 @@
1330 else if (!aborting())
1331 {
1332 if (argcount == MAX_FUNC_ARGS)
1333- emsg_funcname("E740: Too many arguments for function %s", name);
1334+ emsg_funcname(N_("E740: Too many arguments for function %s"), name);
1335 else
1336- emsg_funcname("E116: Invalid arguments for function %s", name);
1337+ emsg_funcname(N_("E116: Invalid arguments for function %s"), name);
1338 }
1339
1340 while (--argcount >= 0)
1341@@ -8091,6 +8153,7 @@
1342
1343 /*
1344 * Give an error message with a function name. Handle <SNR> things.
1345+ * "ermsg" is to be passed without translation, use N_() instead of _().
1346 */
1347 static void
1348 emsg_funcname(ermsg, name)
1349@@ -9518,7 +9581,7 @@
[76dd250]1350 else
1351 {
1352 /* When the optional second argument is non-zero, don't remove matches
1353- * for 'suffixes' and 'wildignore' */
1354+ * for 'wildignore' and don't put matches for 'suffixes' at the end. */
1355 if (argvars[1].v_type != VAR_UNKNOWN
1356 && get_tv_number_chk(&argvars[1], &error))
1357 flags |= WILD_KEEP_ALL;
[5f4a45c9]1358@@ -10300,7 +10363,8 @@
[76dd250]1359 s = get_tv_string(&argvars[0]);
1360 if (s == NULL || *s == NUL || VIM_ISDIGIT(*s))
1361 EMSG2(_(e_invarg2), s);
1362- else if (!function_exists(s))
1363+ /* Don't check an autoload name for existence here. */
1364+ else if (vim_strchr(s, AUTOLOAD_CHAR) == NULL && !function_exists(s))
1365 EMSG2(_("E700: Unknown function: %s"), s);
1366 else
1367 {
[5f4a45c9]1368@@ -10602,7 +10666,7 @@
[76dd250]1369 # ifdef FEAT_WINDOWS
1370 win_T *wp;
1371 # endif
1372- int n = 1;
1373+ int winnr = 1;
1374
1375 if (row >= 0 && col >= 0)
1376 {
[5f4a45c9]1377@@ -10612,9 +10676,9 @@
[76dd250]1378 (void)mouse_comp_pos(win, &row, &col, &lnum);
1379 # ifdef FEAT_WINDOWS
1380 for (wp = firstwin; wp != win; wp = wp->w_next)
1381- ++n;
1382+ ++winnr;
1383 # endif
1384- vimvars[VV_MOUSE_WIN].vv_nr = n;
1385+ vimvars[VV_MOUSE_WIN].vv_nr = winnr;
1386 vimvars[VV_MOUSE_LNUM].vv_nr = lnum;
1387 vimvars[VV_MOUSE_COL].vv_nr = col + 1;
1388 }
[5f4a45c9]1389@@ -11284,13 +11348,25 @@
[76dd250]1390 typval_T *argvars;
1391 typval_T *rettv;
1392 {
1393+ int flags = WILD_SILENT|WILD_USE_NL;
1394 expand_T xpc;
1395+ int error = FALSE;
1396
1397- ExpandInit(&xpc);
1398- xpc.xp_context = EXPAND_FILES;
1399+ /* When the optional second argument is non-zero, don't remove matches
1400+ * for 'wildignore' and don't put matches for 'suffixes' at the end. */
1401+ if (argvars[1].v_type != VAR_UNKNOWN
1402+ && get_tv_number_chk(&argvars[1], &error))
1403+ flags |= WILD_KEEP_ALL;
1404 rettv->v_type = VAR_STRING;
1405- rettv->vval.v_string = ExpandOne(&xpc, get_tv_string(&argvars[0]),
1406- NULL, WILD_USE_NL|WILD_SILENT, WILD_ALL);
1407+ if (!error)
1408+ {
1409+ ExpandInit(&xpc);
1410+ xpc.xp_context = EXPAND_FILES;
1411+ rettv->vval.v_string = ExpandOne(&xpc, get_tv_string(&argvars[0]),
1412+ NULL, flags, WILD_ALL);
1413+ }
1414+ else
1415+ rettv->vval.v_string = NULL;
1416 }
1417
1418 /*
[5f4a45c9]1419@@ -11301,14 +11377,22 @@
[76dd250]1420 typval_T *argvars;
1421 typval_T *rettv;
1422 {
1423+ int flags = 0;
1424 char_u buf1[NUMBUFLEN];
1425 char_u *file = get_tv_string_buf_chk(&argvars[1], buf1);
1426+ int error = FALSE;
1427
1428+ /* When the optional second argument is non-zero, don't remove matches
1429+ * for 'wildignore' and don't put matches for 'suffixes' at the end. */
1430+ if (argvars[2].v_type != VAR_UNKNOWN
1431+ && get_tv_number_chk(&argvars[2], &error))
1432+ flags |= WILD_KEEP_ALL;
1433 rettv->v_type = VAR_STRING;
1434- if (file == NULL)
1435+ if (file == NULL || error)
1436 rettv->vval.v_string = NULL;
1437 else
1438- rettv->vval.v_string = globpath(get_tv_string(&argvars[0]), file);
1439+ rettv->vval.v_string = globpath(get_tv_string(&argvars[0]), file,
1440+ flags);
1441 }
1442
1443 /*
[5f4a45c9]1444@@ -11782,6 +11866,10 @@
[76dd250]1445 n = has_patch(atoi((char *)name + 5));
1446 else if (STRICMP(name, "vim_starting") == 0)
1447 n = (starting != 0);
1448+#ifdef FEAT_MBYTE
1449+ else if (STRICMP(name, "multi_byte_encoding") == 0)
1450+ n = has_mbyte;
1451+#endif
1452 #if defined(FEAT_BEVAL) && defined(FEAT_GUI_W32)
1453 else if (STRICMP(name, "balloon_multiline") == 0)
1454 n = multiline_balloon_available();
[5f4a45c9]1455@@ -15838,10 +15926,9 @@
[76dd250]1456 if (res == FAIL)
1457 res = ITEM_COMPARE_FAIL;
1458 else
1459- /* return value has wrong type */
1460 res = get_tv_number_chk(&rettv, &item_compare_func_err);
1461 if (item_compare_func_err)
1462- res = ITEM_COMPARE_FAIL;
1463+ res = ITEM_COMPARE_FAIL; /* return value has wrong type */
1464 clear_tv(&rettv);
1465 return res;
1466 }
[5f4a45c9]1467@@ -16590,8 +16677,11 @@
[76dd250]1468 p = highlight_has_attr(id, HL_INVERSE, modec);
1469 break;
1470
1471- case 's': /* standout */
1472- p = highlight_has_attr(id, HL_STANDOUT, modec);
1473+ case 's':
1474+ if (TOLOWER_ASC(what[1]) == 'p') /* sp[#] */
1475+ p = highlight_color(id, what, modec);
1476+ else /* standout */
1477+ p = highlight_has_attr(id, HL_STANDOUT, modec);
1478 break;
1479
1480 case 'u':
[5f4a45c9]1481@@ -16658,7 +16748,7 @@
[76dd250]1482 col = get_tv_number(&argvars[1]) - 1; /* -1 on type error */
1483
1484 if (lnum >= 1 && lnum <= curbuf->b_ml.ml_line_count
1485- && col >= 0 && col < (long)STRLEN(ml_get(lnum))
1486+ && col >= 0 && (col == 0 || col < (long)STRLEN(ml_get(lnum)))
1487 && rettv_list_alloc(rettv) != FAIL)
1488 {
1489 (void)syn_get_id(curwin, lnum, (colnr_T)col, FALSE, NULL, TRUE);
[5f4a45c9]1490@@ -18097,14 +18187,28 @@
[76dd250]1491 }
1492
1493 /*
1494- * Set v:count, v:count1 and v:prevcount.
1495+ * Get List v: variable value. Caller must take care of reference count when
1496+ * needed.
1497+ */
1498+ list_T *
1499+get_vim_var_list(idx)
1500+ int idx;
1501+{
1502+ return vimvars[idx].vv_list;
1503+}
1504+
1505+/*
1506+ * Set v:count to "count" and v:count1 to "count1".
1507+ * When "set_prevcount" is TRUE first set v:prevcount from v:count.
1508 */
1509 void
1510-set_vcount(count, count1)
1511+set_vcount(count, count1, set_prevcount)
1512 long count;
1513 long count1;
1514+ int set_prevcount;
1515 {
1516- vimvars[VV_PREVCOUNT].vv_nr = vimvars[VV_COUNT].vv_nr;
1517+ if (set_prevcount)
1518+ vimvars[VV_PREVCOUNT].vv_nr = vimvars[VV_COUNT].vv_nr;
1519 vimvars[VV_COUNT].vv_nr = count;
1520 vimvars[VV_COUNT1].vv_nr = count1;
1521 }
[5f4a45c9]1522@@ -18132,6 +18236,20 @@
[76dd250]1523 }
1524
1525 /*
1526+ * Set List v: variable to "val".
1527+ */
1528+ void
1529+set_vim_var_list(idx, val)
1530+ int idx;
1531+ list_T *val;
1532+{
1533+ list_unref(vimvars[idx].vv_list);
1534+ vimvars[idx].vv_list = val;
1535+ if (val != NULL)
1536+ ++val->lv_refcount;
1537+}
1538+
1539+/*
1540 * Set v:register if needed.
1541 */
1542 void
[5f4a45c9]1543@@ -18868,7 +18986,7 @@
[1f22c7c]1544 dictitem_T *dict_var;
1545 {
1546 hash_init(&dict->dv_hashtab);
1547- dict->dv_refcount = 99999;
1548+ dict->dv_refcount = DO_NOT_FREE_CNT;
1549 dict_var->di_tv.vval.v_dict = dict;
1550 dict_var->di_tv.v_type = VAR_DICT;
1551 dict_var->di_tv.v_lock = VAR_FIXED;
[5f4a45c9]1552@@ -19205,6 +19323,8 @@
[1f22c7c]1553 * Copy the values from typval_T "from" to typval_T "to".
1554 * When needed allocates string or increases reference count.
1555 * Does not make a copy of a list or dict but copies the reference!
1556+ * It is OK for "from" and "to" to point to the same item. This is used to
1557+ * make a copy later.
1558 */
1559 static void
1560 copy_tv(from, to)
[5f4a45c9]1561@@ -19748,7 +19868,7 @@
1562 }
1563 }
1564 else
1565- emsg_funcname("E123: Undefined function: %s", name);
1566+ emsg_funcname(N_("E123: Undefined function: %s"), name);
1567 }
1568 goto ret_free;
1569 }
1570@@ -19792,7 +19912,7 @@
1571 : eval_isnamec(arg[j])))
1572 ++j;
1573 if (arg[j] != NUL)
1574- emsg_funcname(_(e_invarg2), arg);
[9a875fd]1575+ emsg_funcname((char *)e_invarg2, arg);
[5f4a45c9]1576 }
1577 }
1578
1579@@ -20064,7 +20184,7 @@
1580 v = find_var(name, &ht);
1581 if (v != NULL && v->di_tv.v_type == VAR_FUNC)
1582 {
1583- emsg_funcname("E707: Function name conflicts with variable: %s",
1584+ emsg_funcname(N_("E707: Function name conflicts with variable: %s"),
1585 name);
1586 goto erret;
1587 }
1588@@ -20079,7 +20199,7 @@
1589 }
1590 if (fp->uf_calls > 0)
1591 {
1592- emsg_funcname("E127: Cannot redefine function %s: It is in use",
1593+ emsg_funcname(N_("E127: Cannot redefine function %s: It is in use"),
1594 name);
1595 goto erret;
1596 }
1597@@ -20590,6 +20710,9 @@
[76dd250]1598 int st_len = 0;
1599
1600 todo = (int)func_hashtab.ht_used;
1601+ if (todo == 0)
1602+ return; /* nothing to dump */
1603+
1604 sorttab = (ufunc_T **)alloc((unsigned)(sizeof(ufunc_T) * todo));
1605
1606 for (hi = func_hashtab.ht_array; todo > 0; ++hi)
[5f4a45c9]1607@@ -20638,6 +20761,8 @@
[76dd250]1608 prof_self_cmp);
1609 prof_sort_list(fd, sorttab, st_len, "SELF", TRUE);
1610 }
1611+
1612+ vim_free(sorttab);
1613 }
1614
1615 static void
[5f4a45c9]1616@@ -21012,7 +21137,7 @@
[1f22c7c]1617 char_u *save_sourcing_name;
1618 linenr_T save_sourcing_lnum;
1619 scid_T save_current_SID;
1620- funccall_T fc;
1621+ funccall_T *fc;
1622 int save_did_emsg;
1623 static int depth = 0;
1624 dictitem_T *v;
[5f4a45c9]1625@@ -21038,36 +21163,37 @@
[1f22c7c]1626
1627 line_breakcheck(); /* check for CTRL-C hit */
1628
1629- fc.caller = current_funccal;
1630- current_funccal = &fc;
1631- fc.func = fp;
1632- fc.rettv = rettv;
1633+ fc = (funccall_T *)alloc(sizeof(funccall_T));
1634+ fc->caller = current_funccal;
1635+ current_funccal = fc;
1636+ fc->func = fp;
1637+ fc->rettv = rettv;
1638 rettv->vval.v_number = 0;
1639- fc.linenr = 0;
1640- fc.returned = FALSE;
1641- fc.level = ex_nesting_level;
1642+ fc->linenr = 0;
1643+ fc->returned = FALSE;
1644+ fc->level = ex_nesting_level;
1645 /* Check if this function has a breakpoint. */
1646- fc.breakpoint = dbg_find_breakpoint(FALSE, fp->uf_name, (linenr_T)0);
1647- fc.dbg_tick = debug_tick;
1648+ fc->breakpoint = dbg_find_breakpoint(FALSE, fp->uf_name, (linenr_T)0);
1649+ fc->dbg_tick = debug_tick;
1650
1651 /*
1652- * Note about using fc.fixvar[]: This is an array of FIXVAR_CNT variables
1653+ * Note about using fc->fixvar[]: This is an array of FIXVAR_CNT variables
1654 * with names up to VAR_SHORT_LEN long. This avoids having to alloc/free
1655 * each argument variable and saves a lot of time.
1656 */
1657 /*
1658 * Init l: variables.
1659 */
1660- init_var_dict(&fc.l_vars, &fc.l_vars_var);
1661+ init_var_dict(&fc->l_vars, &fc->l_vars_var);
1662 if (selfdict != NULL)
1663 {
1664 /* Set l:self to "selfdict". Use "name" to avoid a warning from
1665 * some compiler that checks the destination size. */
1666- v = &fc.fixvar[fixvar_idx++].var;
1667+ v = &fc->fixvar[fixvar_idx++].var;
1668 name = v->di_key;
1669 STRCPY(name, "self");
1670 v->di_flags = DI_FLAGS_RO + DI_FLAGS_FIX;
1671- hash_add(&fc.l_vars.dv_hashtab, DI2HIKEY(v));
1672+ hash_add(&fc->l_vars.dv_hashtab, DI2HIKEY(v));
1673 v->di_tv.v_type = VAR_DICT;
1674 v->di_tv.v_lock = 0;
1675 v->di_tv.vval.v_dict = selfdict;
[5f4a45c9]1676@@ -21079,28 +21205,31 @@
[1f22c7c]1677 * Set a:0 to "argcount".
1678 * Set a:000 to a list with room for the "..." arguments.
1679 */
1680- init_var_dict(&fc.l_avars, &fc.l_avars_var);
1681- add_nr_var(&fc.l_avars, &fc.fixvar[fixvar_idx++].var, "0",
1682+ init_var_dict(&fc->l_avars, &fc->l_avars_var);
1683+ add_nr_var(&fc->l_avars, &fc->fixvar[fixvar_idx++].var, "0",
[76dd250]1684 (varnumber_T)(argcount - fp->uf_args.ga_len));
[1f22c7c]1685- v = &fc.fixvar[fixvar_idx++].var;
1686- STRCPY(v->di_key, "000");
[76dd250]1687+ /* Use "name" to avoid a warning from some compiler that checks the
1688+ * destination size. */
[1f22c7c]1689+ v = &fc->fixvar[fixvar_idx++].var;
[76dd250]1690+ name = v->di_key;
1691+ STRCPY(name, "000");
1692 v->di_flags = DI_FLAGS_RO | DI_FLAGS_FIX;
[1f22c7c]1693- hash_add(&fc.l_avars.dv_hashtab, DI2HIKEY(v));
1694+ hash_add(&fc->l_avars.dv_hashtab, DI2HIKEY(v));
[76dd250]1695 v->di_tv.v_type = VAR_LIST;
[1f22c7c]1696 v->di_tv.v_lock = VAR_FIXED;
1697- v->di_tv.vval.v_list = &fc.l_varlist;
1698- vim_memset(&fc.l_varlist, 0, sizeof(list_T));
1699- fc.l_varlist.lv_refcount = 99999;
1700- fc.l_varlist.lv_lock = VAR_FIXED;
1701+ v->di_tv.vval.v_list = &fc->l_varlist;
1702+ vim_memset(&fc->l_varlist, 0, sizeof(list_T));
1703+ fc->l_varlist.lv_refcount = DO_NOT_FREE_CNT;
1704+ fc->l_varlist.lv_lock = VAR_FIXED;
1705
1706 /*
1707 * Set a:firstline to "firstline" and a:lastline to "lastline".
1708 * Set a:name to named arguments.
1709 * Set a:N to the "..." arguments.
1710 */
1711- add_nr_var(&fc.l_avars, &fc.fixvar[fixvar_idx++].var, "firstline",
1712+ add_nr_var(&fc->l_avars, &fc->fixvar[fixvar_idx++].var, "firstline",
1713 (varnumber_T)firstline);
1714- add_nr_var(&fc.l_avars, &fc.fixvar[fixvar_idx++].var, "lastline",
1715+ add_nr_var(&fc->l_avars, &fc->fixvar[fixvar_idx++].var, "lastline",
1716 (varnumber_T)lastline);
1717 for (i = 0; i < argcount; ++i)
1718 {
[5f4a45c9]1719@@ -21116,7 +21245,7 @@
[1f22c7c]1720 }
1721 if (fixvar_idx < FIXVAR_CNT && STRLEN(name) <= VAR_SHORT_LEN)
1722 {
1723- v = &fc.fixvar[fixvar_idx++].var;
1724+ v = &fc->fixvar[fixvar_idx++].var;
1725 v->di_flags = DI_FLAGS_RO | DI_FLAGS_FIX;
1726 }
1727 else
[5f4a45c9]1728@@ -21128,7 +21257,7 @@
[1f22c7c]1729 v->di_flags = DI_FLAGS_RO;
1730 }
1731 STRCPY(v->di_key, name);
1732- hash_add(&fc.l_avars.dv_hashtab, DI2HIKEY(v));
1733+ hash_add(&fc->l_avars.dv_hashtab, DI2HIKEY(v));
1734
1735 /* Note: the values are copied directly to avoid alloc/free.
1736 * "argvars" must have VAR_FIXED for v_lock. */
[5f4a45c9]1737@@ -21137,9 +21266,9 @@
[1f22c7c]1738
1739 if (ai >= 0 && ai < MAX_FUNC_ARGS)
1740 {
1741- list_append(&fc.l_varlist, &fc.l_listitems[ai]);
1742- fc.l_listitems[ai].li_tv = argvars[i];
1743- fc.l_listitems[ai].li_tv.v_lock = VAR_FIXED;
1744+ list_append(&fc->l_varlist, &fc->l_listitems[ai]);
1745+ fc->l_listitems[ai].li_tv = argvars[i];
1746+ fc->l_listitems[ai].li_tv.v_lock = VAR_FIXED;
1747 }
1748 }
1749
[5f4a45c9]1750@@ -21204,7 +21333,7 @@
[76dd250]1751 if (!fp->uf_profiling && has_profiling(FALSE, fp->uf_name, NULL))
1752 func_do_profile(fp);
1753 if (fp->uf_profiling
1754- || (fc.caller != NULL && &fc.caller->func->uf_profiling))
[1f22c7c]1755+ || (fc->caller != NULL && fc->caller->func->uf_profiling))
[76dd250]1756 {
1757 ++fp->uf_tm_count;
1758 profile_start(&call_start);
[5f4a45c9]1759@@ -21220,7 +21349,7 @@
[1f22c7c]1760 did_emsg = FALSE;
1761
1762 /* call do_cmdline() to execute the lines */
1763- do_cmdline(NULL, get_func_line, (void *)&fc,
1764+ do_cmdline(NULL, get_func_line, (void *)fc,
1765 DOCMD_NOWAIT|DOCMD_VERBOSE|DOCMD_REPEAT);
1766
1767 --RedrawingDisabled;
[5f4a45c9]1768@@ -21235,16 +21364,16 @@
[76dd250]1769
1770 #ifdef FEAT_PROFILE
1771 if (do_profiling == PROF_YES && (fp->uf_profiling
1772- || (fc.caller != NULL && &fc.caller->func->uf_profiling)))
[1f22c7c]1773+ || (fc->caller != NULL && fc->caller->func->uf_profiling)))
[76dd250]1774 {
1775 profile_end(&call_start);
1776 profile_sub_wait(&wait_start, &call_start);
1777 profile_add(&fp->uf_tm_total, &call_start);
1778 profile_self(&fp->uf_tm_self, &call_start, &fp->uf_tm_children);
1779- if (fc.caller != NULL && &fc.caller->func->uf_profiling)
[1f22c7c]1780+ if (fc->caller != NULL && fc->caller->func->uf_profiling)
[76dd250]1781 {
[1f22c7c]1782- profile_add(&fc.caller->func->uf_tm_children, &call_start);
1783- profile_add(&fc.caller->func->uf_tml_children, &call_start);
1784+ profile_add(&fc->caller->func->uf_tm_children, &call_start);
1785+ profile_add(&fc->caller->func->uf_tml_children, &call_start);
1786 }
1787 }
1788 #endif
[5f4a45c9]1789@@ -21257,9 +21386,9 @@
[1f22c7c]1790
1791 if (aborting())
1792 smsg((char_u *)_("%s aborted"), sourcing_name);
1793- else if (fc.rettv->v_type == VAR_NUMBER)
1794+ else if (fc->rettv->v_type == VAR_NUMBER)
1795 smsg((char_u *)_("%s returning #%ld"), sourcing_name,
1796- (long)fc.rettv->vval.v_number);
1797+ (long)fc->rettv->vval.v_number);
1798 else
1799 {
1800 char_u buf[MSG_BUF_LEN];
[5f4a45c9]1801@@ -21270,7 +21399,7 @@
[1f22c7c]1802 /* The value may be very long. Skip the middle part, so that we
1803 * have some idea how it starts and ends. smsg() would always
1804 * truncate it at the end. */
1805- s = tv2string(fc.rettv, &tofree, numbuf2, 0);
1806+ s = tv2string(fc->rettv, &tofree, numbuf2, 0);
1807 if (s != NULL)
1808 {
1809 trunc_string(s, buf, MSG_BUF_CLEN);
[5f4a45c9]1810@@ -21306,14 +21435,84 @@
[1f22c7c]1811 }
1812
1813 did_emsg |= save_did_emsg;
1814- current_funccal = fc.caller;
1815+ current_funccal = fc->caller;
1816+ --depth;
1817
1818- /* The a: variables typevals were not allocated, only free the allocated
1819- * variables. */
1820- vars_clear_ext(&fc.l_avars.dv_hashtab, FALSE);
1821+ /* if the a:000 list and the a: dict are not referenced we can free the
1822+ * funccall_T and what's in it. */
1823+ if (fc->l_varlist.lv_refcount == DO_NOT_FREE_CNT
1824+ && fc->l_vars.dv_refcount == DO_NOT_FREE_CNT
1825+ && fc->l_avars.dv_refcount == DO_NOT_FREE_CNT)
1826+ {
1827+ free_funccal(fc, FALSE);
1828+ }
1829+ else
1830+ {
1831+ hashitem_T *hi;
1832+ listitem_T *li;
1833+ int todo;
1834
1835- vars_clear(&fc.l_vars.dv_hashtab); /* free all l: variables */
1836- --depth;
1837+ /* "fc" is still in use. This can happen when returning "a:000" or
1838+ * assigning "l:" to a global variable.
1839+ * Link "fc" in the list for garbage collection later. */
1840+ fc->caller = previous_funccal;
1841+ previous_funccal = fc;
1842+
1843+ /* Make a copy of the a: variables, since we didn't do that above. */
1844+ todo = (int)fc->l_avars.dv_hashtab.ht_used;
1845+ for (hi = fc->l_avars.dv_hashtab.ht_array; todo > 0; ++hi)
1846+ {
1847+ if (!HASHITEM_EMPTY(hi))
1848+ {
1849+ --todo;
1850+ v = HI2DI(hi);
1851+ copy_tv(&v->di_tv, &v->di_tv);
1852+ }
1853+ }
1854+
1855+ /* Make a copy of the a:000 items, since we didn't do that above. */
1856+ for (li = fc->l_varlist.lv_first; li != NULL; li = li->li_next)
1857+ copy_tv(&li->li_tv, &li->li_tv);
1858+ }
1859+}
1860+
1861+/*
1862+ * Return TRUE if items in "fc" do not have "copyID". That means they are not
[5f4a45c9]1863+ * referenced from anywhere.
[1f22c7c]1864+ */
1865+ static int
1866+can_free_funccal(fc, copyID)
1867+ funccall_T *fc;
1868+ int copyID;
1869+{
1870+ return (fc->l_varlist.lv_copyID != copyID
1871+ && fc->l_vars.dv_copyID != copyID
1872+ && fc->l_avars.dv_copyID != copyID);
1873+}
1874+
1875+/*
1876+ * Free "fc" and what it contains.
1877+ */
1878+ static void
1879+free_funccal(fc, free_val)
1880+ funccall_T *fc;
1881+ int free_val; /* a: vars were allocated */
1882+{
1883+ listitem_T *li;
1884+
1885+ /* The a: variables typevals may not have been allocated, only free the
1886+ * allocated variables. */
1887+ vars_clear_ext(&fc->l_avars.dv_hashtab, free_val);
1888+
1889+ /* free all l: variables */
1890+ vars_clear(&fc->l_vars.dv_hashtab);
1891+
1892+ /* Free the a:000 variables if they were allocated. */
1893+ if (free_val)
1894+ for (li = fc->l_varlist.lv_first; li != NULL; li = li->li_next)
1895+ clear_tv(&li->li_tv);
1896+
1897+ vim_free(fc);
1898 }
1899
1900 /*
[5f4a45c9]1901@@ -21886,6 +22085,62 @@
[76dd250]1902 }
1903 }
1904
1905+/*
1906+ * List v:oldfiles in a nice way.
1907+ */
1908+/*ARGSUSED*/
1909+ void
1910+ex_oldfiles(eap)
1911+ exarg_T *eap;
1912+{
1913+ list_T *l = vimvars[VV_OLDFILES].vv_list;
1914+ listitem_T *li;
1915+ int nr = 0;
1916+
1917+ if (l == NULL)
1918+ msg((char_u *)_("No old files"));
1919+ else
1920+ {
1921+ msg_start();
1922+ msg_scroll = TRUE;
1923+ for (li = l->lv_first; li != NULL && !got_int; li = li->li_next)
1924+ {
1925+ msg_outnum((long)++nr);
1926+ MSG_PUTS(": ");
1927+ msg_outtrans(get_tv_string(&li->li_tv));
1928+ msg_putchar('\n');
1929+ out_flush(); /* output one line at a time */
1930+ ui_breakcheck();
1931+ }
1932+ /* Assume "got_int" was set to truncate the listing. */
1933+ got_int = FALSE;
1934+
1935+#ifdef FEAT_BROWSE_CMD
1936+ if (cmdmod.browse)
1937+ {
1938+ quit_more = FALSE;
1939+ nr = prompt_for_number(FALSE);
1940+ msg_starthere();
1941+ if (nr > 0)
1942+ {
1943+ char_u *p = list_find_str(get_vim_var_list(VV_OLDFILES),
1944+ (long)nr);
1945+
1946+ if (p != NULL)
1947+ {
1948+ p = expand_env_save(p);
1949+ eap->arg = p;
1950+ eap->cmdidx = CMD_edit;
1951+ cmdmod.browse = FALSE;
1952+ do_exedit(eap, NULL);
1953+ vim_free(p);
1954+ }
1955+ }
1956+ }
1957+#endif
1958+ }
1959+}
1960+
1961 #endif /* FEAT_EVAL */
1962
1963
[5f4a45c9]1964diff -Naur vim72.orig/src/ex_cmds2.c vim72/src/ex_cmds2.c
1965--- vim72.orig/src/ex_cmds2.c 2008-07-13 09:18:22.000000000 -0700
[61a83e8]1966+++ vim72/src/ex_cmds2.c 2009-02-15 23:29:53.533092890 -0800
[9a875fd]1967@@ -2842,6 +2842,7 @@
1968 linenr_T save_sourcing_lnum;
1969 char_u *p;
1970 char_u *fname_exp;
1971+ char_u *firstline = NULL;
1972 int retval = FAIL;
1973 #ifdef FEAT_EVAL
1974 scid_T save_current_SID;
1975@@ -2992,23 +2993,6 @@
1976
1977 cookie.level = ex_nesting_level;
1978 #endif
1979-#ifdef FEAT_MBYTE
1980- cookie.conv.vc_type = CONV_NONE; /* no conversion */
1981-
1982- /* Try reading the first few bytes to check for a UTF-8 BOM. */
1983- {
1984- char_u buf[3];
1985-
1986- if (fread((char *)buf, sizeof(char_u), (size_t)3, cookie.fp)
1987- == (size_t)3
1988- && buf[0] == 0xef && buf[1] == 0xbb && buf[2] == 0xbf)
1989- /* Found BOM, setup conversion and skip over it. */
1990- convert_setup(&cookie.conv, (char_u *)"utf-8", p_enc);
1991- else
1992- /* No BOM found, rewind. */
1993- fseek(cookie.fp, 0L, SEEK_SET);
1994- }
1995-#endif
1996
1997 /*
1998 * Keep the sourcing name/lnum, for recursive calls.
1999@@ -3018,6 +3002,27 @@
2000 save_sourcing_lnum = sourcing_lnum;
2001 sourcing_lnum = 0;
2002
2003+#ifdef FEAT_MBYTE
2004+ cookie.conv.vc_type = CONV_NONE; /* no conversion */
2005+
2006+ /* Read the first line so we can check for a UTF-8 BOM. */
2007+ firstline = getsourceline(0, (void *)&cookie, 0);
2008+ if (firstline != NULL && STRLEN(firstline) >= 3 && firstline[0] == 0xef
2009+ && firstline[1] == 0xbb && firstline[2] == 0xbf)
2010+ {
2011+ /* Found BOM; setup conversion, skip over BOM and recode the line. */
2012+ convert_setup(&cookie.conv, (char_u *)"utf-8", p_enc);
2013+ p = string_convert(&cookie.conv, firstline + 3, NULL);
2014+ if (p == NULL)
2015+ p = vim_strsave(firstline + 3);
2016+ if (p != NULL)
2017+ {
2018+ vim_free(firstline);
2019+ firstline = p;
2020+ }
2021+ }
2022+#endif
2023+
2024 #ifdef STARTUPTIME
2025 time_push(&tv_rel, &tv_start);
2026 #endif
2027@@ -3111,9 +3116,8 @@
2028 /*
2029 * Call do_cmdline, which will call getsourceline() to get the lines.
2030 */
2031- do_cmdline(NULL, getsourceline, (void *)&cookie,
2032+ do_cmdline(firstline, getsourceline, (void *)&cookie,
2033 DOCMD_VERBOSE|DOCMD_NOWAIT|DOCMD_REPEAT);
2034-
2035 retval = OK;
2036
2037 #ifdef FEAT_PROFILE
2038@@ -3145,8 +3149,8 @@
[5f4a45c9]2039 verbose_leave();
2040 }
2041 #ifdef STARTUPTIME
2042- vim_snprintf(IObuff, IOSIZE, "sourcing %s", fname);
2043- time_msg(IObuff, &tv_start);
2044+ vim_snprintf((char *)IObuff, IOSIZE, "sourcing %s", fname);
2045+ time_msg((char *)IObuff, &tv_start);
2046 time_pop(&tv_rel);
2047 #endif
2048
[9a875fd]2049@@ -3171,6 +3175,7 @@
2050 #endif
2051 fclose(cookie.fp);
2052 vim_free(cookie.nextline);
2053+ vim_free(firstline);
2054 #ifdef FEAT_MBYTE
2055 convert_setup(&cookie.conv, NULL, NULL);
2056 #endif
[76dd250]2057diff -Naur vim72.orig/src/ex_cmds.c vim72/src/ex_cmds.c
2058--- vim72.orig/src/ex_cmds.c 2008-08-04 12:15:00.000000000 -0700
[61a83e8]2059+++ vim72/src/ex_cmds.c 2009-02-15 23:29:58.597415281 -0800
[76dd250]2060@@ -24,7 +24,7 @@
2061 static void do_filter __ARGS((linenr_T line1, linenr_T line2, exarg_T *eap, char_u *cmd, int do_in, int do_out));
2062 #ifdef FEAT_VIMINFO
2063 static char_u *viminfo_filename __ARGS((char_u *));
2064-static void do_viminfo __ARGS((FILE *fp_in, FILE *fp_out, int want_info, int want_marks, int force_read));
2065+static void do_viminfo __ARGS((FILE *fp_in, FILE *fp_out, int flags));
2066 static int viminfo_encoding __ARGS((vir_T *virp));
2067 static int read_viminfo_up_to_marks __ARGS((vir_T *virp, int forceit, int writing));
2068 #endif
[7352c10]2069@@ -49,6 +49,7 @@
2070 exarg_T *eap;
2071 {
2072 int c;
2073+ int cval;
2074 char buf1[20];
2075 char buf2[20];
2076 char_u buf3[7];
2077@@ -75,6 +76,10 @@
2078 {
2079 if (c == NL) /* NUL is stored as NL */
2080 c = NUL;
2081+ if (c == CAR && get_fileformat(curbuf) == EOL_MAC)
2082+ cval = NL; /* NL is stored as CR */
2083+ else
2084+ cval = c;
2085 if (vim_isprintc_strict(c) && (c < ' '
2086 #ifndef EBCDIC
2087 || c > '~'
2088@@ -94,7 +99,7 @@
2089 buf2[0] = NUL;
2090 vim_snprintf((char *)IObuff, IOSIZE,
2091 _("<%s>%s%s %d, Hex %02x, Octal %03o"),
2092- transchar(c), buf1, buf2, c, c, c);
2093+ transchar(c), buf1, buf2, cval, cval, cval);
2094 #ifdef FEAT_MBYTE
2095 if (enc_utf8)
2096 c = cc[ci++];
2097@@ -1676,14 +1681,12 @@
[76dd250]2098
2099 /*
2100 * read_viminfo() -- Read the viminfo file. Registers etc. which are already
2101- * set are not over-written unless force is TRUE. -- webb
2102+ * set are not over-written unless "flags" includes VIF_FORCEIT. -- webb
2103 */
2104 int
2105-read_viminfo(file, want_info, want_marks, forceit)
2106- char_u *file;
2107- int want_info;
2108- int want_marks;
2109- int forceit;
2110+read_viminfo(file, flags)
2111+ char_u *file; /* file name or NULL to use default name */
2112+ int flags; /* VIF_WANT_INFO et al. */
2113 {
2114 FILE *fp;
2115 char_u *fname;
[7352c10]2116@@ -1691,7 +1694,7 @@
[76dd250]2117 if (no_viminfo())
2118 return FAIL;
2119
2120- fname = viminfo_filename(file); /* may set to default if NULL */
2121+ fname = viminfo_filename(file); /* get file name in allocated buffer */
2122 if (fname == NULL)
2123 return FAIL;
2124 fp = mch_fopen((char *)fname, READBIN);
[7352c10]2125@@ -1701,8 +1704,9 @@
[76dd250]2126 verbose_enter();
2127 smsg((char_u *)_("Reading viminfo file \"%s\"%s%s%s"),
2128 fname,
2129- want_info ? _(" info") : "",
2130- want_marks ? _(" marks") : "",
2131+ (flags & VIF_WANT_INFO) ? _(" info") : "",
2132+ (flags & VIF_WANT_MARKS) ? _(" marks") : "",
2133+ (flags & VIF_GET_OLDFILES) ? _(" oldfiles") : "",
2134 fp == NULL ? _(" FAILED") : "");
2135 verbose_leave();
2136 }
[7352c10]2137@@ -1712,10 +1716,9 @@
[76dd250]2138 return FAIL;
2139
2140 viminfo_errcnt = 0;
2141- do_viminfo(fp, NULL, want_info, want_marks, forceit);
2142+ do_viminfo(fp, NULL, flags);
2143
2144 fclose(fp);
2145-
2146 return OK;
2147 }
2148
[7352c10]2149@@ -1943,7 +1946,7 @@
[76dd250]2150 * root.
2151 */
2152 if (fp_out != NULL)
2153- (void)fchown(fileno(fp_out), st_old.st_uid, st_old.st_gid);
2154+ ignored = fchown(fileno(fp_out), st_old.st_uid, st_old.st_gid);
2155 #endif
2156 }
2157 }
[7352c10]2158@@ -1968,7 +1971,7 @@
[76dd250]2159 }
2160
2161 viminfo_errcnt = 0;
2162- do_viminfo(fp_in, fp_out, !forceit, !forceit, FALSE);
2163+ do_viminfo(fp_in, fp_out, forceit ? 0 : (VIF_WANT_INFO | VIF_WANT_MARKS));
2164
2165 fclose(fp_out); /* errors are ignored !? */
2166 if (fp_in != NULL)
[7352c10]2167@@ -2041,12 +2044,10 @@
[76dd250]2168 * do_viminfo() -- Should only be called from read_viminfo() & write_viminfo().
2169 */
2170 static void
2171-do_viminfo(fp_in, fp_out, want_info, want_marks, force_read)
2172+do_viminfo(fp_in, fp_out, flags)
2173 FILE *fp_in;
2174 FILE *fp_out;
2175- int want_info;
2176- int want_marks;
2177- int force_read;
2178+ int flags;
2179 {
2180 int count = 0;
2181 int eof = FALSE;
[7352c10]2182@@ -2061,8 +2062,9 @@
[76dd250]2183
2184 if (fp_in != NULL)
2185 {
2186- if (want_info)
2187- eof = read_viminfo_up_to_marks(&vir, force_read, fp_out != NULL);
2188+ if (flags & VIF_WANT_INFO)
2189+ eof = read_viminfo_up_to_marks(&vir,
2190+ flags & VIF_FORCEIT, fp_out != NULL);
2191 else
2192 /* Skip info, find start of marks */
2193 while (!(eof = viminfo_readline(&vir))
[7352c10]2194@@ -2092,8 +2094,9 @@
[76dd250]2195 write_viminfo_bufferlist(fp_out);
2196 count = write_viminfo_marks(fp_out);
2197 }
2198- if (fp_in != NULL && want_marks)
2199- copy_viminfo_marks(&vir, fp_out, count, eof);
2200+ if (fp_in != NULL
2201+ && (flags & (VIF_WANT_MARKS | VIF_GET_OLDFILES | VIF_FORCEIT)))
2202+ copy_viminfo_marks(&vir, fp_out, count, eof, flags);
2203
2204 vim_free(vir.vir_line);
2205 #ifdef FEAT_MBYTE
[9a875fd]2206@@ -2414,8 +2417,8 @@
2207 cursor_on(); /* msg_start() switches it off */
2208 out_flush();
2209 silent_mode = save_silent;
2210- info_message = FALSE;
2211 }
2212+ info_message = FALSE;
2213 }
2214
2215 /*
[61a83e8]2216@@ -2704,7 +2707,12 @@
2217 if (eap->cmdidx == CMD_saveas)
2218 {
2219 if (retval == OK)
2220+ {
2221 curbuf->b_p_ro = FALSE;
2222+#ifdef FEAT_WINDOWS
2223+ redraw_tabline = TRUE;
2224+#endif
2225+ }
2226 /* Change directories when the 'acd' option is set. */
2227 DO_AUTOCHDIR
2228 }
2229@@ -5059,6 +5067,7 @@
[76dd250]2230
2231 if (did_sub)
2232 ++sub_nlines;
2233+ vim_free(new_start); /* for when substitute was cancelled */
2234 vim_free(sub_firstline); /* free the copy of the original line */
2235 sub_firstline = NULL;
2236 }
2237diff -Naur vim72.orig/src/ex_cmds.h vim72/src/ex_cmds.h
2238--- vim72.orig/src/ex_cmds.h 2008-06-21 11:47:57.000000000 -0700
[61a83e8]2239+++ vim72/src/ex_cmds.h 2009-02-15 23:26:29.532020952 -0800
[76dd250]2240@@ -278,7 +278,7 @@
2241 EX(CMD_crewind, "crewind", ex_cc,
2242 RANGE|NOTADR|COUNT|TRLBAR|BANG),
2243 EX(CMD_cscope, "cscope", do_cscope,
2244- EXTRA|NOTRLCOM|SBOXOK|XFILE),
2245+ EXTRA|NOTRLCOM|XFILE),
2246 EX(CMD_cstag, "cstag", do_cstag,
2247 BANG|TRLBAR|WORD1),
2248 EX(CMD_cunmap, "cunmap", ex_unmap,
2249@@ -506,7 +506,7 @@
2250 EX(CMD_lclose, "lclose", ex_cclose,
2251 RANGE|NOTADR|COUNT|TRLBAR),
2252 EX(CMD_lcscope, "lcscope", do_cscope,
2253- EXTRA|NOTRLCOM|SBOXOK|XFILE),
2254+ EXTRA|NOTRLCOM|XFILE),
2255 EX(CMD_left, "left", ex_align,
2256 TRLBAR|RANGE|WHOLEFOLD|EXTRA|CMDWIN|MODIFY),
2257 EX(CMD_leftabove, "leftabove", ex_wrongmodifier,
2258@@ -635,6 +635,8 @@
2259 RANGE|NOTADR|ZEROR|EXTRA|TRLBAR|NOTRLCOM|USECTRLV|CMDWIN),
2260 EX(CMD_noremap, "noremap", ex_map,
2261 BANG|EXTRA|TRLBAR|NOTRLCOM|USECTRLV|CMDWIN),
2262+EX(CMD_noautocmd, "noautocmd", ex_wrongmodifier,
2263+ NEEDARG|EXTRA|NOTRLCOM),
2264 EX(CMD_nohlsearch, "nohlsearch", ex_nohlsearch,
2265 TRLBAR|SBOXOK|CMDWIN),
2266 EX(CMD_noreabbrev, "noreabbrev", ex_abbreviate,
2267@@ -651,6 +653,8 @@
2268 EXTRA|TRLBAR|NOTRLCOM|USECTRLV|CMDWIN),
2269 EX(CMD_open, "open", ex_open,
2270 RANGE|EXTRA),
2271+EX(CMD_oldfiles, "oldfiles", ex_oldfiles,
2272+ BANG|TRLBAR|SBOXOK|CMDWIN),
2273 EX(CMD_omap, "omap", ex_map,
2274 EXTRA|TRLBAR|NOTRLCOM|USECTRLV|CMDWIN),
2275 EX(CMD_omapclear, "omapclear", ex_mapclear,
2276@@ -802,7 +806,7 @@
2277 EX(CMD_scriptencoding, "scriptencoding", ex_scriptencoding,
2278 WORD1|TRLBAR|CMDWIN),
2279 EX(CMD_scscope, "scscope", do_scscope,
2280- EXTRA|NOTRLCOM|SBOXOK),
2281+ EXTRA|NOTRLCOM),
2282 EX(CMD_set, "set", ex_set,
2283 TRLBAR|EXTRA|CMDWIN|SBOXOK),
2284 EX(CMD_setfiletype, "setfiletype", ex_setfiletype,
2285diff -Naur vim72.orig/src/ex_docmd.c vim72/src/ex_docmd.c
2286--- vim72.orig/src/ex_docmd.c 2008-07-26 04:51:05.000000000 -0700
[61a83e8]2287+++ vim72/src/ex_docmd.c 2009-02-15 23:29:17.390774968 -0800
[76dd250]2288@@ -364,6 +364,7 @@
2289 # define ex_function ex_ni
2290 # define ex_delfunction ex_ni
2291 # define ex_return ex_ni
2292+# define ex_oldfiles ex_ni
2293 #endif
2294 static char_u *arg_all __ARGS((void));
2295 #ifdef FEAT_SESSION
2296@@ -1770,7 +1771,7 @@
2297 }
2298 if (checkforcmd(&ea.cmd, "browse", 3))
2299 {
2300-#ifdef FEAT_BROWSE
2301+#ifdef FEAT_BROWSE_CMD
2302 cmdmod.browse = TRUE;
2303 #endif
2304 continue;
2305@@ -2978,6 +2979,7 @@
2306 {"keepmarks", 3, FALSE},
2307 {"leftabove", 5, FALSE},
2308 {"lockmarks", 3, FALSE},
2309+ {"noautocmd", 3, FALSE},
2310 {"rightbelow", 6, FALSE},
2311 {"sandbox", 3, FALSE},
2312 {"silent", 3, FALSE},
2313@@ -3608,6 +3610,7 @@
2314 return set_context_in_autocmd(xp, arg, FALSE);
2315
2316 case CMD_doautocmd:
2317+ case CMD_doautoall:
2318 return set_context_in_autocmd(xp, arg, TRUE);
2319 #endif
2320 case CMD_set:
[5f4a45c9]2321@@ -5479,6 +5482,9 @@
2322 return OK;
2323 }
2324
2325+/*
2326+ * ":command ..."
2327+ */
2328 static void
2329 ex_command(eap)
2330 exarg_T *eap;
2331@@ -5911,6 +5917,7 @@
2332
2333 char_u *start;
2334 char_u *end;
2335+ char_u *ksp;
2336 size_t len, totlen;
2337
2338 size_t split_len = 0;
2339@@ -5927,16 +5934,51 @@
2340
2341 /*
2342 * Replace <> in the command by the arguments.
2343+ * First round: "buf" is NULL, compute length, allocate "buf".
2344+ * Second round: copy result into "buf".
2345 */
2346 buf = NULL;
2347 for (;;)
2348 {
2349- p = cmd->uc_rep;
2350- q = buf;
2351+ p = cmd->uc_rep; /* source */
2352+ q = buf; /* destinateion */
2353 totlen = 0;
2354- while ((start = vim_strchr(p, '<')) != NULL
2355- && (end = vim_strchr(start + 1, '>')) != NULL)
2356+
2357+ for (;;)
2358 {
2359+ start = vim_strchr(p, '<');
2360+ if (start != NULL)
2361+ end = vim_strchr(start + 1, '>');
2362+ if (buf != NULL)
2363+ {
2364+ ksp = vim_strchr(p, K_SPECIAL);
2365+ if (ksp != NULL && (start == NULL || ksp < start || end == NULL)
2366+ && ((ksp[1] == KS_SPECIAL && ksp[2] == KE_FILLER)
2367+# ifdef FEAT_GUI
2368+ || (ksp[1] == KS_EXTRA && ksp[2] == (int)KE_CSI)
2369+# endif
2370+ ))
2371+ {
2372+ /* K_SPECIAL han been put in the buffer as K_SPECIAL
2373+ * KS_SPECIAL KE_FILLER, like for mappings, but
2374+ * do_cmdline() doesn't handle that, so convert it back.
2375+ * Also change K_SPECIAL KS_EXTRA KE_CSI into CSI. */
2376+ len = ksp - p;
2377+ if (len > 0)
2378+ {
2379+ mch_memmove(q, p, len);
2380+ q += len;
2381+ }
2382+ *q++ = ksp[1] == KS_SPECIAL ? K_SPECIAL : CSI;
2383+ p = ksp + 3;
2384+ continue;
2385+ }
2386+ }
2387+
2388+ /* break if there no <item> is found */
2389+ if (start == NULL || end == NULL)
2390+ break;
2391+
2392 /* Include the '>' */
2393 ++end;
2394
2395@@ -8749,8 +8791,8 @@
[76dd250]2396 else if (*dirnow != NUL
2397 && (ssop_flags & SSOP_CURDIR) && globaldir != NULL)
2398 {
2399- (void)mch_chdir((char *)globaldir);
2400- shorten_fnames(TRUE);
2401+ if (mch_chdir((char *)globaldir) == OK)
2402+ shorten_fnames(TRUE);
2403 }
2404
2405 failed |= (makeopens(fd, dirnow) == FAIL);
[5f4a45c9]2406@@ -9506,24 +9548,50 @@
[76dd250]2407 break;
2408 }
2409 s = src + 1;
2410+ if (*s == '<') /* "#<99" uses v:oldfiles */
2411+ ++s;
2412 i = (int)getdigits(&s);
2413 *usedlen = (int)(s - src); /* length of what we expand */
2414
2415- buf = buflist_findnr(i);
2416- if (buf == NULL)
2417+ if (src[1] == '<')
2418 {
2419- *errormsg = (char_u *)_("E194: No alternate file name to substitute for '#'");
2420+ if (*usedlen < 2)
2421+ {
2422+ /* Should we give an error message for #<text? */
2423+ *usedlen = 1;
2424+ return NULL;
2425+ }
2426+#ifdef FEAT_EVAL
2427+ result = list_find_str(get_vim_var_list(VV_OLDFILES),
2428+ (long)i);
2429+ if (result == NULL)
2430+ {
2431+ *errormsg = (char_u *)"";
2432+ return NULL;
2433+ }
2434+#else
2435+ *errormsg = (char_u *)_("E809: #< is not available without the +eval feature");
2436 return NULL;
2437+#endif
2438 }
2439- if (lnump != NULL)
2440- *lnump = ECMD_LAST;
2441- if (buf->b_fname == NULL)
2442+ else
2443 {
2444- result = (char_u *)"";
2445- valid = 0; /* Must have ":p:h" to be valid */
2446+ buf = buflist_findnr(i);
2447+ if (buf == NULL)
2448+ {
2449+ *errormsg = (char_u *)_("E194: No alternate file name to substitute for '#'");
2450+ return NULL;
2451+ }
2452+ if (lnump != NULL)
2453+ *lnump = ECMD_LAST;
2454+ if (buf->b_fname == NULL)
2455+ {
2456+ result = (char_u *)"";
2457+ valid = 0; /* Must have ":p:h" to be valid */
2458+ }
2459+ else
2460+ result = buf->b_fname;
2461 }
2462- else
2463- result = buf->b_fname;
2464 break;
2465
2466 #ifdef FEAT_SEARCHPATH
[5f4a45c9]2467@@ -9541,6 +9609,15 @@
[76dd250]2468 #ifdef FEAT_AUTOCMD
2469 case SPEC_AFILE: /* file name for autocommand */
2470 result = autocmd_fname;
2471+ if (result != NULL && !autocmd_fname_full)
2472+ {
2473+ /* Still need to turn the fname into a full path. It is
2474+ * postponed to avoid a delay when <afile> is not used. */
2475+ autocmd_fname_full = TRUE;
2476+ result = FullName_save(autocmd_fname, FALSE);
2477+ vim_free(autocmd_fname);
2478+ autocmd_fname = result;
2479+ }
2480 if (result == NULL)
2481 {
2482 *errormsg = (char_u *)_("E495: no autocommand file name to substitute for \"<afile>\"");
[5f4a45c9]2483@@ -10067,7 +10144,7 @@
[76dd250]2484 */
2485 if (put_line(fd, "let s:sx = expand(\"<sfile>:p:r\").\"x.vim\"") == FAIL
2486 || put_line(fd, "if file_readable(s:sx)") == FAIL
2487- || put_line(fd, " exe \"source \" . s:sx") == FAIL
2488+ || put_line(fd, " exe \"source \" . fnameescape(s:sx)") == FAIL
2489 || put_line(fd, "endif") == FAIL)
2490 return FAIL;
2491
[5f4a45c9]2492@@ -10689,7 +10766,8 @@
[76dd250]2493 p_viminfo = (char_u *)"'100";
2494 if (eap->cmdidx == CMD_rviminfo)
2495 {
2496- if (read_viminfo(eap->arg, TRUE, TRUE, eap->forceit) == FAIL)
2497+ if (read_viminfo(eap->arg, VIF_WANT_INFO | VIF_WANT_MARKS
2498+ | (eap->forceit ? VIF_FORCEIT : 0)) == FAIL)
2499 EMSG(_("E195: Cannot open viminfo file for reading"));
2500 }
2501 else
2502diff -Naur vim72.orig/src/ex_getln.c vim72/src/ex_getln.c
2503--- vim72.orig/src/ex_getln.c 2008-08-08 02:31:33.000000000 -0700
[61a83e8]2504+++ vim72/src/ex_getln.c 2009-02-15 23:27:23.655489034 -0800
[76dd250]2505@@ -31,6 +31,8 @@
2506 int cmdattr; /* attributes for prompt */
2507 int overstrike; /* Typing mode on the command line. Shared by
2508 getcmdline() and put_on_cmdline(). */
2509+ expand_T *xpc; /* struct being used for expansion, xp_pattern
2510+ may point into cmdbuff */
2511 int xp_context; /* type of expansion */
2512 # ifdef FEAT_EVAL
2513 char_u *xp_arg; /* user-defined expansion arg */
2514@@ -38,7 +40,11 @@
2515 # endif
2516 };
2517
2518-static struct cmdline_info ccline; /* current cmdline_info */
2519+/* The current cmdline_info. It is initialized in getcmdline() and after that
2520+ * used by other functions. When invoking getcmdline() recursively it needs
2521+ * to be saved with save_cmdline() and restored with restore_cmdline().
2522+ * TODO: make it local to getcmdline() and pass it around. */
2523+static struct cmdline_info ccline;
2524
2525 static int cmd_showtail; /* Only show path tail in lists ? */
2526
2527@@ -238,6 +244,7 @@
2528 }
2529
2530 ExpandInit(&xpc);
2531+ ccline.xpc = &xpc;
2532
2533 #ifdef FEAT_RIGHTLEFT
2534 if (curwin->w_p_rl && *curwin->w_p_rlc == 's'
2535@@ -408,9 +415,10 @@
2536 #endif
2537
2538 /*
2539- * <S-Tab> works like CTRL-P (unless 'wc' is <S-Tab>).
2540+ * When there are matching completions to select <S-Tab> works like
2541+ * CTRL-P (unless 'wc' is <S-Tab>).
2542 */
2543- if (c != p_wc && c == K_S_TAB && xpc.xp_numfiles != -1)
2544+ if (c != p_wc && c == K_S_TAB && xpc.xp_numfiles > 0)
2545 c = Ctrl_P;
2546
2547 #ifdef FEAT_WILDMENU
2548@@ -1513,6 +1521,7 @@
2549 int old_firstc;
2550
2551 vim_free(ccline.cmdbuff);
2552+ xpc.xp_context = EXPAND_NOTHING;
2553 if (hiscnt == hislen)
2554 p = lookfor; /* back to the old one */
2555 else
2556@@ -1839,6 +1848,7 @@
2557 #endif
2558
2559 ExpandCleanup(&xpc);
2560+ ccline.xpc = NULL;
2561
2562 #ifdef FEAT_SEARCH_EXTRA
2563 if (did_incsearch)
2564@@ -2508,6 +2518,20 @@
2565 }
2566 mch_memmove(ccline.cmdbuff, p, (size_t)ccline.cmdlen + 1);
2567 vim_free(p);
2568+
2569+ if (ccline.xpc != NULL
2570+ && ccline.xpc->xp_pattern != NULL
2571+ && ccline.xpc->xp_context != EXPAND_NOTHING
2572+ && ccline.xpc->xp_context != EXPAND_UNSUCCESSFUL)
2573+ {
2574+ int i = (int)(ccline.xpc->xp_pattern - p);
2575+
2576+ /* If xp_pattern points inside the old cmdbuff it needs to be adjusted
2577+ * to point into the newly allocated memory. */
2578+ if (i >= 0 && i <= ccline.cmdlen)
2579+ ccline.xpc->xp_pattern = ccline.cmdbuff + i;
2580+ }
2581+
2582 return OK;
2583 }
2584
2585@@ -2875,6 +2899,7 @@
2586 prev_ccline = ccline;
2587 ccline.cmdbuff = NULL;
2588 ccline.cmdprompt = NULL;
2589+ ccline.xpc = NULL;
2590 }
2591
2592 /*
2593@@ -3582,6 +3607,7 @@
2594 ExpandInit(xp)
2595 expand_T *xp;
2596 {
2597+ xp->xp_pattern = NULL;
2598 xp->xp_backslash = XP_BS_NONE;
2599 #ifndef BACKSLASH_IN_FILENAME
2600 xp->xp_shell = FALSE;
2601@@ -4871,7 +4897,7 @@
2602 if (s == NULL)
2603 return FAIL;
2604 sprintf((char *)s, "%s/%s*.vim", dirname, pat);
2605- all = globpath(p_rtp, s);
2606+ all = globpath(p_rtp, s, 0);
2607 vim_free(s);
2608 if (all == NULL)
2609 return FAIL;
2610@@ -4912,9 +4938,10 @@
2611 * newlines. Returns NULL for an error or no matches.
2612 */
2613 char_u *
2614-globpath(path, file)
2615+globpath(path, file, expand_options)
2616 char_u *path;
2617 char_u *file;
2618+ int expand_options;
2619 {
2620 expand_T xpc;
2621 char_u *buf;
2622@@ -4943,10 +4970,10 @@
2623 {
2624 add_pathsep(buf);
2625 STRCAT(buf, file);
2626- if (ExpandFromContext(&xpc, buf, &num_p, &p, WILD_SILENT) != FAIL
2627- && num_p > 0)
2628+ if (ExpandFromContext(&xpc, buf, &num_p, &p,
2629+ WILD_SILENT|expand_options) != FAIL && num_p > 0)
2630 {
2631- ExpandEscape(&xpc, buf, num_p, p, WILD_SILENT);
2632+ ExpandEscape(&xpc, buf, num_p, p, WILD_SILENT|expand_options);
2633 for (len = 0, i = 0; i < num_p; ++i)
2634 len += (int)STRLEN(p[i]) + 1;
2635
2636diff -Naur vim72.orig/src/feature.h vim72/src/feature.h
2637--- vim72.orig/src/feature.h 2008-08-06 04:00:39.000000000 -0700
[61a83e8]2638+++ vim72/src/feature.h 2009-02-15 23:26:29.532020952 -0800
[76dd250]2639@@ -767,9 +767,13 @@
2640
2641 /*
2642 * +browse ":browse" command.
2643+ * or just the ":browse" command modifier
2644 */
2645-#if defined(FEAT_NORMAL) && (defined(FEAT_GUI_MSWIN) || defined(FEAT_GUI_MOTIF) || defined(FEAT_GUI_ATHENA) || defined(FEAT_GUI_GTK) || defined(FEAT_GUI_PHOTON) || defined(FEAT_GUI_MAC))
2646-# define FEAT_BROWSE
2647+#if defined(FEAT_NORMAL)
2648+# define FEAT_BROWSE_CMD
2649+# if defined(FEAT_GUI_MSWIN) || defined(FEAT_GUI_MOTIF) || defined(FEAT_GUI_ATHENA) || defined(FEAT_GUI_GTK) || defined(FEAT_GUI_PHOTON) || defined(FEAT_GUI_MAC)
2650+# define FEAT_BROWSE
2651+# endif
2652 #endif
2653
2654 /*
2655diff -Naur vim72.orig/src/fileio.c vim72/src/fileio.c
2656--- vim72.orig/src/fileio.c 2008-08-06 04:01:03.000000000 -0700
[61a83e8]2657+++ vim72/src/fileio.c 2009-02-15 23:28:42.524542813 -0800
[76dd250]2658@@ -932,7 +932,10 @@
2659 else
2660 {
2661 if (eap != NULL && eap->force_ff != 0)
2662+ {
2663 fileformat = get_fileformat_force(curbuf, eap);
2664+ try_unix = try_dos = try_mac = FALSE;
2665+ }
2666 else if (curbuf->b_p_bin)
2667 fileformat = EOL_UNIX; /* binary: use Unix format */
2668 else if (*p_ffs == NUL)
2669@@ -2211,7 +2214,7 @@
2670 {
2671 /* Use stderr for stdin, makes shell commands work. */
2672 close(0);
2673- dup(2);
2674+ ignored = dup(2);
2675 }
2676 #endif
2677
2678@@ -2341,11 +2344,6 @@
2679 STRCAT(IObuff, _("[CR missing]"));
2680 c = TRUE;
2681 }
2682- if (ff_error == EOL_MAC)
2683- {
2684- STRCAT(IObuff, _("[NL found]"));
2685- c = TRUE;
2686- }
2687 if (split)
2688 {
2689 STRCAT(IObuff, _("[long lines split]"));
2690@@ -2711,7 +2709,7 @@
2691 {
2692 if (!curbuf->b_marks_read && get_viminfo_parameter('\'') > 0
2693 && curbuf->b_ffname != NULL)
2694- read_viminfo(NULL, FALSE, TRUE, FALSE);
2695+ read_viminfo(NULL, VIF_WANT_MARKS);
2696
2697 /* Always set b_marks_read; needed when 'viminfo' is changed to include
2698 * the ' parameter after opening a buffer. */
2699@@ -3451,7 +3449,7 @@
2700 {
2701 # ifdef UNIX
2702 # ifdef HAVE_FCHOWN
2703- fchown(fd, st_old.st_uid, st_old.st_gid);
2704+ ignored = fchown(fd, st_old.st_uid, st_old.st_gid);
2705 # endif
2706 if (mch_stat((char *)IObuff, &st) < 0
2707 || st.st_uid != st_old.st_uid
2708@@ -4367,7 +4365,7 @@
2709 || st.st_uid != st_old.st_uid
2710 || st.st_gid != st_old.st_gid)
2711 {
2712- fchown(fd, st_old.st_uid, st_old.st_gid);
2713+ ignored = fchown(fd, st_old.st_uid, st_old.st_gid);
2714 if (perm >= 0) /* set permission again, may have changed */
2715 (void)mch_setperm(wfname, perm);
2716 }
2717@@ -5550,9 +5548,10 @@
2718 name = "ucs-4le"; /* FF FE 00 00 */
2719 len = 4;
2720 }
2721- else if (flags == FIO_ALL || flags == (FIO_UCS2 | FIO_ENDIAN_L))
2722+ else if (flags == (FIO_UCS2 | FIO_ENDIAN_L))
2723 name = "ucs-2le"; /* FF FE */
2724- else if (flags == (FIO_UTF16 | FIO_ENDIAN_L))
2725+ else if (flags == FIO_ALL || flags == (FIO_UTF16 | FIO_ENDIAN_L))
2726+ /* utf-16le is preferred, it also works for ucs-2le text */
2727 name = "utf-16le"; /* FF FE */
2728 }
2729 else if (p[0] == 0xfe && p[1] == 0xff
2730@@ -6031,9 +6030,9 @@
2731 {
2732 tbuf[FGETS_SIZE - 2] = NUL;
2733 #ifdef USE_CR
2734- fgets_cr((char *)tbuf, FGETS_SIZE, fp);
2735+ ignoredp = fgets_cr((char *)tbuf, FGETS_SIZE, fp);
2736 #else
2737- fgets((char *)tbuf, FGETS_SIZE, fp);
2738+ ignoredp = fgets((char *)tbuf, FGETS_SIZE, fp);
2739 #endif
2740 } while (tbuf[FGETS_SIZE - 2] != NUL && tbuf[FGETS_SIZE - 2] != '\n');
2741 }
[43c52a1]2742@@ -6107,12 +6106,24 @@
2743 #ifdef HAVE_ACL
2744 vim_acl_T acl; /* ACL from original file */
2745 #endif
2746+#if defined(UNIX) || defined(CASE_INSENSITIVE_FILENAME)
2747+ int use_tmp_file = FALSE;
2748+#endif
2749
2750 /*
2751- * When the names are identical, there is nothing to do.
2752+ * When the names are identical, there is nothing to do. When they refer
2753+ * to the same file (ignoring case and slash/backslash differences) but
2754+ * the file name differs we need to go through a temp file.
2755 */
2756 if (fnamecmp(from, to) == 0)
2757- return 0;
2758+ {
2759+#ifdef CASE_INSENSITIVE_FILENAME
2760+ if (STRCMP(gettail(from), gettail(to)) != 0)
2761+ use_tmp_file = TRUE;
2762+ else
2763+#endif
2764+ return 0;
2765+ }
2766
2767 /*
2768 * Fail if the "from" file doesn't exist. Avoids that "to" is deleted.
2769@@ -6120,6 +6131,55 @@
[1f22c7c]2770 if (mch_stat((char *)from, &st) < 0)
2771 return -1;
2772
2773+#ifdef UNIX
2774+ {
2775+ struct stat st_to;
2776+
2777+ /* It's possible for the source and destination to be the same file.
2778+ * This happens when "from" and "to" differ in case and are on a FAT32
2779+ * filesystem. In that case go through a temp file name. */
2780+ if (mch_stat((char *)to, &st_to) >= 0
2781+ && st.st_dev == st_to.st_dev
2782+ && st.st_ino == st_to.st_ino)
[43c52a1]2783+ use_tmp_file = TRUE;
2784+ }
2785+#endif
2786+
2787+#if defined(UNIX) || defined(CASE_INSENSITIVE_FILENAME)
2788+ if (use_tmp_file)
2789+ {
2790+ char tempname[MAXPATHL + 1];
2791+
2792+ /*
2793+ * Find a name that doesn't exist and is in the same directory.
2794+ * Rename "from" to "tempname" and then rename "tempname" to "to".
2795+ */
2796+ if (STRLEN(from) >= MAXPATHL - 5)
2797+ return -1;
2798+ STRCPY(tempname, from);
2799+ for (n = 123; n < 99999; ++n)
[1f22c7c]2800+ {
[43c52a1]2801+ sprintf((char *)gettail((char_u *)tempname), "%d", n);
2802+ if (mch_stat(tempname, &st) < 0)
[1f22c7c]2803+ {
[43c52a1]2804+ if (mch_rename((char *)from, tempname) == 0)
[1f22c7c]2805+ {
[43c52a1]2806+ if (mch_rename(tempname, (char *)to) == 0)
2807+ return 0;
2808+ /* Strange, the second step failed. Try moving the
2809+ * file back and return failure. */
2810+ mch_rename(tempname, (char *)from);
[1f22c7c]2811+ return -1;
2812+ }
[43c52a1]2813+ /* If it fails for one temp name it will most likely fail
2814+ * for any temp name, give up. */
2815+ return -1;
[1f22c7c]2816+ }
2817+ }
[43c52a1]2818+ return -1;
[1f22c7c]2819+ }
2820+#endif
2821+
2822 /*
2823 * Delete the "to" file, this is required on some systems to make the
2824 * mch_rename() work, on other systems it makes sure that we don't have
[43c52a1]2825@@ -8523,6 +8583,7 @@
[76dd250]2826 char_u *save_sourcing_name;
2827 linenr_T save_sourcing_lnum;
2828 char_u *save_autocmd_fname;
2829+ int save_autocmd_fname_full;
2830 int save_autocmd_bufnr;
2831 char_u *save_autocmd_match;
2832 int save_autocmd_busy;
[43c52a1]2833@@ -8601,6 +8662,7 @@
[76dd250]2834 * Save the autocmd_* variables and info about the current buffer.
2835 */
2836 save_autocmd_fname = autocmd_fname;
2837+ save_autocmd_fname_full = autocmd_fname_full;
2838 save_autocmd_bufnr = autocmd_bufnr;
2839 save_autocmd_match = autocmd_match;
2840 save_autocmd_busy = autocmd_busy;
[43c52a1]2841@@ -8618,14 +8680,15 @@
[76dd250]2842 if (fname != NULL && *fname != NUL)
2843 autocmd_fname = fname;
2844 else if (buf != NULL)
2845- autocmd_fname = buf->b_fname;
2846+ autocmd_fname = buf->b_ffname;
2847 else
2848 autocmd_fname = NULL;
2849 }
2850 else
2851 autocmd_fname = fname_io;
2852 if (autocmd_fname != NULL)
2853- autocmd_fname = FullName_save(autocmd_fname, FALSE);
2854+ autocmd_fname = vim_strsave(autocmd_fname);
2855+ autocmd_fname_full = FALSE; /* call FullName_save() later */
2856
2857 /*
2858 * Set the buffer number to be used for <abuf>.
[43c52a1]2859@@ -8810,6 +8873,7 @@
[76dd250]2860 sourcing_lnum = save_sourcing_lnum;
2861 vim_free(autocmd_fname);
2862 autocmd_fname = save_autocmd_fname;
2863+ autocmd_fname_full = save_autocmd_fname_full;
2864 autocmd_bufnr = save_autocmd_bufnr;
2865 autocmd_match = save_autocmd_match;
2866 #ifdef FEAT_EVAL
[43c52a1]2867@@ -8918,7 +8982,7 @@
[76dd250]2868 {
2869 apc->curpat = NULL;
2870
2871- /* only use a pattern when it has not been removed, has commands and
2872+ /* Only use a pattern when it has not been removed, has commands and
2873 * the group matches. For buffer-local autocommands only check the
2874 * buffer number. */
2875 if (ap->pat != NULL && ap->cmds != NULL
[43c52a1]2876@@ -9104,7 +9168,7 @@
[76dd250]2877 set_context_in_autocmd(xp, arg, doautocmd)
2878 expand_T *xp;
2879 char_u *arg;
2880- int doautocmd; /* TRUE for :doautocmd, FALSE for :autocmd */
2881+ int doautocmd; /* TRUE for :doauto*, FALSE for :autocmd */
2882 {
2883 char_u *p;
2884 int group;
2885diff -Naur vim72.orig/src/fold.c vim72/src/fold.c
2886--- vim72.orig/src/fold.c 2008-08-06 04:01:12.000000000 -0700
[61a83e8]2887+++ vim72/src/fold.c 2009-02-15 23:28:45.352722167 -0800
[76dd250]2888@@ -48,7 +48,7 @@
2889 static int foldFind __ARGS((garray_T *gap, linenr_T lnum, fold_T **fpp));
2890 static int foldLevelWin __ARGS((win_T *wp, linenr_T lnum));
2891 static void checkupdate __ARGS((win_T *wp));
2892-static void setFoldRepeat __ARGS((linenr_T lnum, long count, int open));
2893+static void setFoldRepeat __ARGS((linenr_T lnum, long count, int do_open));
2894 static linenr_T setManualFold __ARGS((linenr_T lnum, int opening, int recurse, int *donep));
2895 static linenr_T setManualFoldWin __ARGS((win_T *wp, linenr_T lnum, int opening, int recurse, int *donep));
2896 static void foldOpenNested __ARGS((fold_T *fpr));
[43c52a1]2897@@ -740,7 +740,7 @@
2898 garray_T *found_ga;
2899 fold_T *found_fp = NULL;
2900 linenr_T found_off = 0;
2901- int use_level = FALSE;
2902+ int use_level;
2903 int maybe_small = FALSE;
2904 int level = 0;
2905 linenr_T lnum = start;
2906@@ -757,6 +757,7 @@
2907 gap = &curwin->w_folds;
2908 found_ga = NULL;
2909 lnum_off = 0;
2910+ use_level = FALSE;
2911 for (;;)
2912 {
2913 if (!foldFind(gap, lnum - lnum_off, &fp))
2914@@ -783,20 +784,21 @@
2915 else
2916 {
2917 lnum = found_fp->fd_top + found_fp->fd_len + found_off;
2918- did_one = TRUE;
2919
2920 if (foldmethodIsManual(curwin))
2921 deleteFoldEntry(found_ga,
2922 (int)(found_fp - (fold_T *)found_ga->ga_data), recursive);
2923 else
2924 {
2925- if (found_fp->fd_top + found_off < first_lnum)
2926- first_lnum = found_fp->fd_top;
2927- if (lnum > last_lnum)
2928+ if (first_lnum > found_fp->fd_top + found_off)
2929+ first_lnum = found_fp->fd_top + found_off;
2930+ if (last_lnum < lnum)
2931 last_lnum = lnum;
2932- parseMarker(curwin);
2933+ if (!did_one)
2934+ parseMarker(curwin);
2935 deleteFoldMarkers(found_fp, recursive, found_off);
2936 }
2937+ did_one = TRUE;
2938
2939 /* redraw window */
2940 changed_window_setting();
2941@@ -811,6 +813,10 @@
2942 redraw_curbuf_later(INVERTED);
2943 #endif
2944 }
2945+ else
2946+ /* Deleting markers may make cursor column invalid. */
2947+ check_cursor_col();
2948+
2949 if (last_lnum > 0)
2950 changed_lines(first_lnum, (colnr_T)0, last_lnum, 0L);
2951 }
2952@@ -1241,10 +1247,10 @@
[76dd250]2953 * Repeat "count" times.
2954 */
2955 static void
2956-setFoldRepeat(lnum, count, open)
2957+setFoldRepeat(lnum, count, do_open)
2958 linenr_T lnum;
2959 long count;
2960- int open;
2961+ int do_open;
2962 {
2963 int done;
2964 long n;
[43c52a1]2965@@ -1252,7 +1258,7 @@
[76dd250]2966 for (n = 0; n < count; ++n)
2967 {
2968 done = DONE_NOTHING;
2969- (void)setManualFold(lnum, open, FALSE, &done);
2970+ (void)setManualFold(lnum, do_open, FALSE, &done);
2971 if (!(done & DONE_ACTION))
2972 {
2973 /* Only give an error message when no fold could be opened. */
2974diff -Naur vim72.orig/src/getchar.c vim72/src/getchar.c
2975--- vim72.orig/src/getchar.c 2008-07-22 09:57:48.000000000 -0700
[61a83e8]2976+++ vim72/src/getchar.c 2009-02-15 23:27:32.644064534 -0800
[76dd250]2977@@ -4702,7 +4702,7 @@
2978 return FAIL;
2979 if (mp->m_noremap != REMAP_YES && fprintf(fd, "nore") < 0)
2980 return FAIL;
2981- if (fprintf(fd, cmd) < 0)
2982+ if (fputs(cmd, fd) < 0)
2983 return FAIL;
2984 if (buf != NULL && fputs(" <buffer>", fd) < 0)
2985 return FAIL;
2986@@ -4801,7 +4801,7 @@
2987 }
2988 if (IS_SPECIAL(c) || modifiers) /* special key */
2989 {
2990- if (fprintf(fd, (char *)get_special_key_name(c, modifiers)) < 0)
2991+ if (fputs((char *)get_special_key_name(c, modifiers), fd) < 0)
2992 return FAIL;
2993 continue;
2994 }
2995diff -Naur vim72.orig/src/globals.h vim72/src/globals.h
2996--- vim72.orig/src/globals.h 2008-07-26 04:53:29.000000000 -0700
[61a83e8]2997+++ vim72/src/globals.h 2009-02-15 23:28:48.044895935 -0800
[76dd250]2998@@ -1022,6 +1022,7 @@
2999 #endif
3000 #ifdef FEAT_AUTOCMD
3001 EXTERN char_u *autocmd_fname INIT(= NULL); /* fname for <afile> on cmdline */
3002+EXTERN int autocmd_fname_full; /* autocmd_fname is full path */
3003 EXTERN int autocmd_bufnr INIT(= 0); /* fnum for <abuf> on cmdline */
3004 EXTERN char_u *autocmd_match INIT(= NULL); /* name for <amatch> on cmdline */
3005 EXTERN int did_cursorhold INIT(= FALSE); /* set when CursorHold t'gerd */
[43c52a1]3006@@ -1339,7 +1340,6 @@
3007
3008 #ifdef FEAT_NETBEANS_INTG
3009 EXTERN char *netbeansArg INIT(= NULL); /* the -nb[:host:port:passwd] arg */
3010-EXTERN int netbeansCloseFile INIT(= 0); /* send killed if != 0 */
3011 EXTERN int netbeansFireChanges INIT(= 1); /* send buffer changes if != 0 */
3012 EXTERN int netbeansForcedQuit INIT(= 0);/* don't write modified files */
3013 EXTERN int netbeansReadFile INIT(= 1); /* OK to read from disk if != 0 */
3014@@ -1548,6 +1548,14 @@
[76dd250]3015 EXTERN time_t starttime;
3016
3017 /*
3018+ * Some compilers warn for not using a return value, but in some situations we
3019+ * can't do anything useful with the value. Assign to this variable to avoid
3020+ * the warning.
3021+ */
3022+EXTERN int ignored;
3023+EXTERN char *ignoredp;
3024+
3025+/*
3026 * Optional Farsi support. Include it here, so EXTERN and INIT are defined.
3027 */
3028 #ifdef FEAT_FKMAP
[5f4a45c9]3029diff -Naur vim72.orig/src/gui_at_sb.c vim72/src/gui_at_sb.c
3030--- vim72.orig/src/gui_at_sb.c 2004-06-07 07:32:25.000000000 -0700
[61a83e8]3031+++ vim72/src/gui_at_sb.c 2009-02-15 23:27:36.144289425 -0800
[5f4a45c9]3032@@ -1078,6 +1078,12 @@
3033 Cardinal *num_params; /* unused */
3034 {
3035 ScrollbarWidget sbw = (ScrollbarWidget)w;
3036+ /* Use a union to avoid a warning for the weird conversion from float to
3037+ * XtPointer. Comes from Xaw/Scrollbar.c. */
3038+ union {
3039+ XtPointer xtp;
3040+ float xtf;
3041+ } xtpf;
3042
3043 if (LookAhead(w, event))
3044 return;
3045@@ -1085,7 +1091,8 @@
3046 /* thumbProc is not pretty, but is necessary for backwards
3047 compatibility on those architectures for which it work{s,ed};
3048 the intent is to pass a (truncated) float by value. */
3049- XtCallCallbacks(w, XtNthumbProc, *(XtPointer*)&sbw->scrollbar.top);
3050+ xtpf.xtf = sbw->scrollbar.top;
3051+ XtCallCallbacks(w, XtNthumbProc, xtpf.xtp);
3052 XtCallCallbacks(w, XtNjumpProc, (XtPointer)&sbw->scrollbar.top);
3053 }
3054
[76dd250]3055diff -Naur vim72.orig/src/gui.c vim72/src/gui.c
3056--- vim72.orig/src/gui.c 2008-07-27 12:32:14.000000000 -0700
[61a83e8]3057+++ vim72/src/gui.c 2009-02-15 23:28:10.986519625 -0800
[76dd250]3058@@ -139,7 +139,7 @@
3059 /* The read returns when the child closes the pipe (or when
3060 * the child dies for some reason). */
3061 close(pipefd[1]);
3062- (void)read(pipefd[0], &dummy, (size_t)1);
3063+ ignored = (int)read(pipefd[0], &dummy, (size_t)1);
3064 close(pipefd[0]);
3065 }
3066
3067@@ -3241,7 +3241,7 @@
3068 i = Rows;
3069 gui_update_tabline();
3070 Rows = i;
3071- need_set_size = RESIZE_VERT;
3072+ need_set_size |= RESIZE_VERT;
3073 if (using_tabline)
3074 fix_size = TRUE;
3075 if (!gui_use_tabline())
3076@@ -3275,9 +3275,9 @@
3077 if (gui.which_scrollbars[i] != prev_which_scrollbars[i])
3078 {
3079 if (i == SBAR_BOTTOM)
3080- need_set_size = RESIZE_VERT;
3081+ need_set_size |= RESIZE_VERT;
3082 else
3083- need_set_size = RESIZE_HOR;
3084+ need_set_size |= RESIZE_HOR;
3085 if (gui.which_scrollbars[i])
3086 fix_size = TRUE;
3087 }
3088@@ -3297,7 +3297,7 @@
3089 gui_mch_enable_menu(gui.menu_is_active);
3090 Rows = i;
3091 prev_menu_is_active = gui.menu_is_active;
3092- need_set_size = RESIZE_VERT;
3093+ need_set_size |= RESIZE_VERT;
3094 if (gui.menu_is_active)
3095 fix_size = TRUE;
3096 }
3097@@ -3308,7 +3308,7 @@
3098 {
3099 gui_mch_show_toolbar(using_toolbar);
3100 prev_toolbar = using_toolbar;
3101- need_set_size = RESIZE_VERT;
3102+ need_set_size |= RESIZE_VERT;
3103 if (using_toolbar)
3104 fix_size = TRUE;
3105 }
3106@@ -3318,7 +3318,7 @@
3107 {
3108 gui_mch_enable_footer(using_footer);
3109 prev_footer = using_footer;
3110- need_set_size = RESIZE_VERT;
3111+ need_set_size |= RESIZE_VERT;
3112 if (using_footer)
3113 fix_size = TRUE;
3114 }
3115@@ -3330,10 +3330,11 @@
3116 prev_tearoff = using_tearoff;
3117 }
3118 #endif
3119- if (need_set_size)
3120+ if (need_set_size != 0)
3121 {
3122 #ifdef FEAT_GUI_GTK
3123- long c = Columns;
3124+ long prev_Columns = Columns;
3125+ long prev_Rows = Rows;
3126 #endif
3127 /* Adjust the size of the window to make the text area keep the
3128 * same size and to avoid that part of our window is off-screen
3129@@ -3349,11 +3350,14 @@
3130 * If you remove this, please test this command for resizing
3131 * effects (with optional left scrollbar): ":vsp|q|vsp|q|vsp|q".
3132 * Don't do this while starting up though.
3133- * And don't change Rows, it may have be reduced intentionally
3134- * when adding menu/toolbar/tabline. */
3135- if (!gui.starting)
3136+ * Don't change Rows when adding menu/toolbar/tabline.
3137+ * Don't change Columns when adding vertical toolbar. */
3138+ if (!gui.starting && need_set_size != (RESIZE_VERT | RESIZE_HOR))
3139 (void)char_avail();
3140- Columns = c;
3141+ if ((need_set_size & RESIZE_VERT) == 0)
3142+ Rows = prev_Rows;
3143+ if ((need_set_size & RESIZE_HOR) == 0)
3144+ Columns = prev_Columns;
3145 #endif
3146 }
3147 #ifdef FEAT_WINDOWS
3148diff -Naur vim72.orig/src/gui_gtk_x11.c vim72/src/gui_gtk_x11.c
3149--- vim72.orig/src/gui_gtk_x11.c 2008-07-04 03:46:24.000000000 -0700
[61a83e8]3150+++ vim72/src/gui_gtk_x11.c 2009-02-15 23:27:36.148289425 -0800
[76dd250]3151@@ -4070,14 +4070,14 @@
3152
3153 if (mask & (XValue | YValue))
3154 {
3155- int w, h;
3156- gui_mch_get_screen_dimensions(&w, &h);
3157- h += p_ghr + get_menu_tool_height();
3158- w += get_menu_tool_width();
3159+ int ww, hh;
3160+ gui_mch_get_screen_dimensions(&ww, &hh);
3161+ hh += p_ghr + get_menu_tool_height();
3162+ ww += get_menu_tool_width();
3163 if (mask & XNegative)
3164- x += w - pixel_width;
3165+ x += ww - pixel_width;
3166 if (mask & YNegative)
3167- y += h - pixel_height;
3168+ y += hh - pixel_height;
3169 #ifdef HAVE_GTK2
3170 gtk_window_move(GTK_WINDOW(gui.mainwin), x, y);
3171 #else
3172diff -Naur vim72.orig/src/gui_x11.c vim72/src/gui_x11.c
3173--- vim72.orig/src/gui_x11.c 2008-06-08 08:13:45.000000000 -0700
[61a83e8]3174+++ vim72/src/gui_x11.c 2009-02-15 23:26:39.688669925 -0800
[76dd250]3175@@ -2450,7 +2450,7 @@
3176 *colorPtr = colortable[closest];
3177 }
3178
3179- free(colortable);
3180+ vim_free(colortable);
3181 return OK;
3182 }
3183
3184diff -Naur vim72.orig/src/gui_xmdlg.c vim72/src/gui_xmdlg.c
3185--- vim72.orig/src/gui_xmdlg.c 2008-06-21 09:05:32.000000000 -0700
[61a83e8]3186+++ vim72/src/gui_xmdlg.c 2009-02-15 23:27:36.148289425 -0800
[76dd250]3187@@ -369,10 +369,10 @@
3188 char buf[TEMP_BUF_SIZE];
3189 XmString items[MAX_ENTRIES_IN_LIST];
3190 int i;
3191- int index;
3192+ int idx;
3193
3194- for (index = (int)ENCODING; index < (int)NONE; ++index)
3195- count[index] = 0;
3196+ for (idx = (int)ENCODING; idx < (int)NONE; ++idx)
3197+ count[idx] = 0;
3198
3199 /* First we insert the wild char into every single list. */
3200 if (fix != ENCODING)
3201@@ -503,14 +503,14 @@
3202 /*
3203 * Now loop trough the remaining lists and set them up.
3204 */
3205- for (index = (int)NAME; index < (int)NONE; ++index)
3206+ for (idx = (int)NAME; idx < (int)NONE; ++idx)
3207 {
3208 Widget w;
3209
3210- if (fix == (enum ListSpecifier)index)
3211+ if (fix == (enum ListSpecifier)idx)
3212 continue;
3213
3214- switch ((enum ListSpecifier)index)
3215+ switch ((enum ListSpecifier)idx)
3216 {
3217 case NAME:
3218 w = data->list[NAME];
3219@@ -525,21 +525,21 @@
3220 w = (Widget)0; /* for lint */
3221 }
3222
3223- for (i = 0; i < count[index]; ++i)
3224+ for (i = 0; i < count[idx]; ++i)
3225 {
3226- items[i] = XmStringCreateLocalized(list[index][i]);
3227- XtFree(list[index][i]);
3228+ items[i] = XmStringCreateLocalized(list[idx][i]);
3229+ XtFree(list[idx][i]);
3230 }
3231 XmListDeleteAllItems(w);
3232- XmListAddItems(w, items, count[index], 1);
3233- if (data->sel[index])
3234+ XmListAddItems(w, items, count[idx], 1);
3235+ if (data->sel[idx])
3236 {
3237 XmStringFree(items[0]);
3238- items[0] = XmStringCreateLocalized(data->sel[index]);
3239+ items[0] = XmStringCreateLocalized(data->sel[idx]);
3240 XmListSelectItem(w, items[0], False);
3241 XmListSetBottomItem(w, items[0]);
3242 }
3243- for (i = 0; i < count[index]; ++i)
3244+ for (i = 0; i < count[idx]; ++i)
3245 XmStringFree(items[i]);
3246 }
3247 }
3248@@ -695,14 +695,14 @@
3249 int n;
3250 XmString str;
3251 Arg args[4];
3252- char *msg = _("no specific match");
3253+ char *nomatch_msg = _("no specific match");
3254
3255 n = 0;
3256- str = XmStringCreateLocalized(msg);
3257+ str = XmStringCreateLocalized(nomatch_msg);
3258 XtSetArg(args[n], XmNlabelString, str); ++n;
3259 XtSetValues(data->sample, args, n);
3260 apply_fontlist(data->sample);
3261- XmTextSetString(data->name, msg);
3262+ XmTextSetString(data->name, nomatch_msg);
3263 XmStringFree(str);
3264
3265 return False;
3266@@ -886,21 +886,21 @@
3267 {
3268 int i;
3269 int max;
3270- int index = 0;
3271+ int idx = 0;
3272 int size;
3273- char str[128];
3274+ char buf[128];
3275
3276 for (i = 0, max = 0; i < data->num; i++)
3277 {
3278- get_part(fn(data, i), 7, str);
3279- size = atoi(str);
3280+ get_part(fn(data, i), 7, buf);
3281+ size = atoi(buf);
3282 if ((size > max) && (size < MAX_DISPLAY_SIZE))
3283 {
3284- index = i;
3285+ idx = i;
3286 max = size;
3287 }
3288 }
3289- strcpy(big_font, fn(data, index));
3290+ strcpy(big_font, fn(data, idx));
3291 }
3292 data->old = XLoadQueryFont(XtDisplay(parent), big_font);
3293 data->old_list = gui_motif_create_fontlist(data->old);
3294@@ -1217,28 +1217,28 @@
3295
3296 if (i != 0)
3297 {
3298- char name[TEMP_BUF_SIZE];
3299- char style[TEMP_BUF_SIZE];
3300- char size[TEMP_BUF_SIZE];
3301- char encoding[TEMP_BUF_SIZE];
3302+ char namebuf[TEMP_BUF_SIZE];
3303+ char stylebuf[TEMP_BUF_SIZE];
3304+ char sizebuf[TEMP_BUF_SIZE];
3305+ char encodingbuf[TEMP_BUF_SIZE];
3306 char *found;
3307
3308 found = names[0];
3309
3310- name_part(found, name);
3311- style_part(found, style);
3312- size_part(found, size, data->in_pixels);
3313- encoding_part(found, encoding);
3314-
3315- if (strlen(name) > 0
3316- && strlen(style) > 0
3317- && strlen(size) > 0
3318- && strlen(encoding) > 0)
3319+ name_part(found, namebuf);
3320+ style_part(found, stylebuf);
3321+ size_part(found, sizebuf, data->in_pixels);
3322+ encoding_part(found, encodingbuf);
3323+
3324+ if (strlen(namebuf) > 0
3325+ && strlen(stylebuf) > 0
3326+ && strlen(sizebuf) > 0
3327+ && strlen(encodingbuf) > 0)
3328 {
3329- data->sel[NAME] = XtNewString(name);
3330- data->sel[STYLE] = XtNewString(style);
3331- data->sel[SIZE] = XtNewString(size);
3332- data->sel[ENCODING] = XtNewString(encoding);
3333+ data->sel[NAME] = XtNewString(namebuf);
3334+ data->sel[STYLE] = XtNewString(stylebuf);
3335+ data->sel[SIZE] = XtNewString(sizebuf);
3336+ data->sel[ENCODING] = XtNewString(encodingbuf);
3337 data->font_name = XtNewString(names[0]);
3338 display_sample(data);
3339 XmTextSetString(data->name, data->font_name);
3340diff -Naur vim72.orig/src/gui_xmebw.c vim72/src/gui_xmebw.c
3341--- vim72.orig/src/gui_xmebw.c 2007-09-06 03:57:51.000000000 -0700
[61a83e8]3342+++ vim72/src/gui_xmebw.c 2009-02-15 23:27:36.148289425 -0800
[76dd250]3343@@ -1256,7 +1256,7 @@
3344 }
3345 else
3346 {
3347- int adjust = 0;
3348+ adjust = 0;
3349
3350 #if !defined(LESSTIF_VERSION) && (XmVersion > 1002)
3351 /*
3352@@ -1268,12 +1268,11 @@
3353 {
3354 case XmEXTERNAL_HIGHLIGHT:
3355 adjust = (eb->primitive.highlight_thickness -
3356- (eb->pushbutton.default_button_shadow_thickness ?
3357- Xm3D_ENHANCE_PIXEL : 0));
3358+ (eb->pushbutton.default_button_shadow_thickness
3359+ ? Xm3D_ENHANCE_PIXEL : 0));
3360 break;
3361
3362 case XmINTERNAL_HIGHLIGHT:
3363- adjust = 0;
3364 break;
3365
3366 default:
3367diff -Naur vim72.orig/src/if_cscope.c vim72/src/if_cscope.c
3368--- vim72.orig/src/if_cscope.c 2008-06-24 09:32:34.000000000 -0700
[61a83e8]3369+++ vim72/src/if_cscope.c 2009-02-15 23:29:20.378966335 -0800
[76dd250]3370@@ -74,7 +74,7 @@
3371 { "add", cs_add,
3372 N_("Add a new database"), "add file|dir [pre-path] [flags]", 0 },
3373 { "find", cs_find,
3374- N_("Query for a pattern"), FIND_USAGE, 1 },
3375+ N_("Query for a pattern"), "find c|d|e|f|g|i|s|t name", 1 },
3376 { "help", cs_help,
3377 N_("Show this message"), "help", 0 },
3378 { "kill", cs_kill,
[5f4a45c9]3379@@ -1177,10 +1177,27 @@
3380 (void)MSG_PUTS(_("cscope commands:\n"));
3381 while (cmdp->name != NULL)
3382 {
3383- (void)smsg((char_u *)_("%-5s: %-30s (Usage: %s)"),
3384- cmdp->name, _(cmdp->help), cmdp->usage);
3385+ char *help = _(cmdp->help);
3386+ int space_cnt = 30 - vim_strsize((char_u *)help);
3387+
3388+ /* Use %*s rather than %30s to ensure proper alignment in utf-8 */
3389+ if (space_cnt < 0)
3390+ space_cnt = 0;
3391+ (void)smsg((char_u *)_("%-5s: %s%*s (Usage: %s)"),
3392+ cmdp->name,
3393+ help, space_cnt, " ",
3394+ cmdp->usage);
[76dd250]3395 if (strcmp(cmdp->name, "find") == 0)
3396- MSG_PUTS(FIND_HELP);
3397+ MSG_PUTS(_("\n"
3398+ " c: Find functions calling this function\n"
3399+ " d: Find functions called by this function\n"
3400+ " e: Find this egrep pattern\n"
3401+ " f: Find this file\n"
3402+ " g: Find this definition\n"
3403+ " i: Find files #including this file\n"
3404+ " s: Find this C symbol\n"
3405+ " t: Find assignments to\n"));
3406+
3407 cmdp++;
3408 }
3409
3410diff -Naur vim72.orig/src/if_cscope.h vim72/src/if_cscope.h
3411--- vim72.orig/src/if_cscope.h 2007-09-02 07:51:08.000000000 -0700
[61a83e8]3412+++ vim72/src/if_cscope.h 2009-02-15 23:25:07.934792289 -0800
[76dd250]3413@@ -42,17 +42,6 @@
3414 * f 7name Find this file
3415 * i 8name Find files #including this file
3416 */
3417-#define FIND_USAGE "find c|d|e|f|g|i|s|t name"
3418-#define FIND_HELP "\n\
3419- c: Find functions calling this function\n\
3420- d: Find functions called by this function\n\
3421- e: Find this egrep pattern\n\
3422- f: Find this file\n\
3423- g: Find this definition\n\
3424- i: Find files #including this file\n\
3425- s: Find this C symbol\n\
3426- t: Find assignments to\n"
3427-
3428
3429 typedef struct {
3430 char * name;
3431diff -Naur vim72.orig/src/if_perl.xs vim72/src/if_perl.xs
3432--- vim72.orig/src/if_perl.xs 2008-07-17 13:55:09.000000000 -0700
[61a83e8]3433+++ vim72/src/if_perl.xs 2009-02-15 23:28:02.421970945 -0800
[76dd250]3434@@ -136,6 +136,9 @@
3435 # define Perl_newXS_flags dll_Perl_newXS_flags
3436 #endif
3437 # define Perl_sv_free dll_Perl_sv_free
3438+# if (PERL_REVISION == 5) && (PERL_VERSION >= 10)
3439+# define Perl_sv_free2 dll_Perl_sv_free2
3440+# endif
3441 # define Perl_sv_isa dll_Perl_sv_isa
3442 # define Perl_sv_magic dll_Perl_sv_magic
3443 # define Perl_sv_setiv dll_Perl_sv_setiv
3444@@ -163,7 +166,7 @@
3445 # define Perl_Isv_yes_ptr dll_Perl_Isv_yes_ptr
3446 # define boot_DynaLoader dll_boot_DynaLoader
3447
3448-# define Perl_sys_init3 dll_Perl_sys_init3
3449+# define Perl_sys_init dll_Perl_sys_init
3450 # define Perl_sys_term dll_Perl_sys_term
3451 # define Perl_ISv_ptr dll_Perl_ISv_ptr
3452 # define Perl_Istack_max_ptr dll_Perl_Istack_max_ptr
3453@@ -268,7 +271,8 @@
3454 static void (*boot_DynaLoader)_((pTHX_ CV*));
3455
3456 #if (PERL_REVISION == 5) && (PERL_VERSION >= 10)
3457-static void (*Perl_sys_init3)(int* argc, char*** argv, char*** env);
3458+static void (*Perl_sv_free2)(pTHX_ SV*);
3459+static void (*Perl_sys_init)(int* argc, char*** argv);
3460 static void (*Perl_sys_term)(void);
3461 static SV** (*Perl_ISv_ptr)(register PerlInterpreter*);
3462 static SV*** (*Perl_Istack_max_ptr)(register PerlInterpreter*);
3463@@ -367,7 +371,8 @@
3464 {"Perl_TXpv_ptr", (PERL_PROC*)&Perl_TXpv_ptr},
3465 {"Perl_Tna_ptr", (PERL_PROC*)&Perl_Tna_ptr},
3466 #else
3467- {"Perl_sys_init3", (PERL_PROC*)&Perl_sys_init3},
3468+ {"Perl_sv_free2", (PERL_PROC*)&Perl_sv_free2},
3469+ {"Perl_sys_init", (PERL_PROC*)&Perl_sys_init},
3470 {"Perl_sys_term", (PERL_PROC*)&Perl_sys_term},
3471 {"Perl_ISv_ptr", (PERL_PROC*)&Perl_ISv_ptr},
3472 {"Perl_Istack_sp_ptr", (PERL_PROC*)&Perl_Istack_sp_ptr},
3473@@ -455,7 +460,7 @@
3474 static char *argv[] = { "", "-e", "" };
3475
3476 #if (PERL_REVISION == 5) && (PERL_VERSION >= 10)
3477- Perl_sys_init3(&argc, (char***)&argv, NULL);
3478+ Perl_sys_init(&argc, (char***)&argv);
3479 #endif
3480 perl_interp = perl_alloc();
3481 perl_construct(perl_interp);
3482diff -Naur vim72.orig/src/if_python.c vim72/src/if_python.c
3483--- vim72.orig/src/if_python.c 2008-07-17 14:09:32.000000000 -0700
[61a83e8]3484+++ vim72/src/if_python.c 2009-02-15 23:29:02.149800251 -0800
[76dd250]3485@@ -531,6 +531,12 @@
3486 if (PythonMod_Init())
3487 goto fail;
3488
3489+ /* Remove the element from sys.path that was added because of our
3490+ * argv[0] value in PythonMod_Init(). Previously we used an empty
3491+ * string, but dependinding on the OS we then get an empty entry or
3492+ * the current directory in sys.path. */
3493+ PyRun_SimpleString("import sys; sys.path = filter(lambda x: x != '/must>not&exist', sys.path)");
3494+
3495 /* the first python thread is vim's, release the lock */
3496 Python_SaveThread();
3497
[7352c10]3498@@ -1145,14 +1151,23 @@
3499
3500 /* Check if we run into a recursive loop. The item must be in lookupDict
3501 * then and we can use it again. */
3502- sprintf(ptrBuf, PRINTF_DECIMAL_LONG_U, (long_u)our_tv);
3503- result = PyDict_GetItemString(lookupDict, ptrBuf);
3504- if (result != NULL)
3505- Py_INCREF(result);
3506- else if (our_tv->v_type == VAR_STRING)
3507+ if ((our_tv->v_type == VAR_LIST && our_tv->vval.v_list != NULL)
3508+ || (our_tv->v_type == VAR_DICT && our_tv->vval.v_dict != NULL))
3509+ {
3510+ sprintf(ptrBuf, PRINTF_DECIMAL_LONG_U,
3511+ our_tv->v_type == VAR_LIST ? (long_u)our_tv->vval.v_list
3512+ : (long_u)our_tv->vval.v_dict);
3513+ result = PyDict_GetItemString(lookupDict, ptrBuf);
3514+ if (result != NULL)
3515+ {
3516+ Py_INCREF(result);
3517+ return result;
3518+ }
3519+ }
3520+
3521+ if (our_tv->v_type == VAR_STRING)
3522 {
3523 result = Py_BuildValue("s", our_tv->vval.v_string);
3524- PyDict_SetItemString(lookupDict, ptrBuf, result);
3525 }
3526 else if (our_tv->v_type == VAR_NUMBER)
3527 {
3528@@ -1161,7 +1176,6 @@
3529 /* For backwards compatibility numbers are stored as strings. */
3530 sprintf(buf, "%ld", (long)our_tv->vval.v_number);
3531 result = Py_BuildValue("s", buf);
3532- PyDict_SetItemString(lookupDict, ptrBuf, result);
3533 }
3534 # ifdef FEAT_FLOAT
3535 else if (our_tv->v_type == VAR_FLOAT)
3536@@ -1170,7 +1184,6 @@
3537
3538 sprintf(buf, "%f", our_tv->vval.v_float);
3539 result = Py_BuildValue("s", buf);
3540- PyDict_SetItemString(lookupDict, ptrBuf, result);
3541 }
3542 # endif
3543 else if (our_tv->v_type == VAR_LIST)
3544@@ -1179,10 +1192,11 @@
3545 listitem_T *curr;
3546
3547 result = PyList_New(0);
3548- PyDict_SetItemString(lookupDict, ptrBuf, result);
3549
3550 if (list != NULL)
3551 {
3552+ PyDict_SetItemString(lookupDict, ptrBuf, result);
3553+
3554 for (curr = list->lv_first; curr != NULL; curr = curr->li_next)
3555 {
3556 newObj = VimToPython(&curr->li_tv, depth + 1, lookupDict);
3557@@ -1194,7 +1208,6 @@
3558 else if (our_tv->v_type == VAR_DICT)
3559 {
3560 result = PyDict_New();
3561- PyDict_SetItemString(lookupDict, ptrBuf, result);
3562
3563 if (our_tv->vval.v_dict != NULL)
3564 {
3565@@ -1203,6 +1216,8 @@
3566 hashitem_T *hi;
3567 dictitem_T *di;
3568
3569+ PyDict_SetItemString(lookupDict, ptrBuf, result);
3570+
3571 for (hi = ht->ht_array; todo > 0; ++hi)
3572 {
3573 if (!HASHITEM_EMPTY(hi))
3574@@ -2345,7 +2360,8 @@
[76dd250]3575 {
3576 PyObject *mod;
3577 PyObject *dict;
3578- static char *(argv[2]) = {"", NULL};
3579+ /* The special value is removed from sys.path in Python_Init(). */
3580+ static char *(argv[2]) = {"/must>not&exist/foo", NULL};
3581
3582 /* Fixups... */
3583 BufferType.ob_type = &PyType_Type;
3584diff -Naur vim72.orig/src/if_xcmdsrv.c vim72/src/if_xcmdsrv.c
3585--- vim72.orig/src/if_xcmdsrv.c 2008-07-18 06:05:03.000000000 -0700
[61a83e8]3586+++ vim72/src/if_xcmdsrv.c 2009-02-15 23:26:47.873194300 -0800
[76dd250]3587@@ -736,7 +736,7 @@
3588 + serverReply.ga_len;
3589 e.id = w;
3590 ga_init2(&e.strings, 1, 100);
3591- memcpy(p, &e, sizeof(e));
3592+ mch_memmove(p, &e, sizeof(e));
3593 serverReply.ga_len++;
3594 }
3595 }
3596@@ -1018,7 +1018,7 @@
3597 p++;
3598 count = numItems - (p - regProp);
3599 if (count > 0)
3600- memcpy(entry, p, count);
3601+ mch_memmove(entry, p, count);
3602 XChangeProperty(dpy, RootWindow(dpy, 0), registryProperty, XA_STRING,
3603 8, PropModeReplace, regProp,
3604 (int)(numItems - (p - entry)));
3605@@ -1072,7 +1072,7 @@
3606 p++;
3607 lastHalf = numItems - (p - regProp);
3608 if (lastHalf > 0)
3609- memcpy(entry, p, lastHalf);
3610+ mch_memmove(entry, p, lastHalf);
3611 numItems = (entry - regProp) + lastHalf;
3612 p = entry;
3613 continue;
3614diff -Naur vim72.orig/src/main.c vim72/src/main.c
3615--- vim72.orig/src/main.c 2008-07-24 01:40:56.000000000 -0700
[61a83e8]3616+++ vim72/src/main.c 2009-02-15 23:27:36.148289425 -0800
[76dd250]3617@@ -645,11 +645,12 @@
3618
3619 #ifdef FEAT_VIMINFO
3620 /*
3621- * Read in registers, history etc, but not marks, from the viminfo file
3622+ * Read in registers, history etc, but not marks, from the viminfo file.
3623+ * This is where v:oldfiles gets filled.
3624 */
3625 if (*p_viminfo != NUL)
3626 {
3627- read_viminfo(NULL, TRUE, FALSE, FALSE);
3628+ read_viminfo(NULL, VIF_WANT_INFO | VIF_GET_OLDFILES);
3629 TIME_MSG("reading viminfo");
3630 }
3631 #endif
3632@@ -1457,7 +1458,8 @@
3633 ++initstr;
3634 }
3635
3636- if (TOLOWER_ASC(initstr[0]) == 'g' || initstr[0] == 'k')
3637+ /* "gvim" starts the GUI. Also accept "Gvim" for MS-Windows. */
3638+ if (TOLOWER_ASC(initstr[0]) == 'g')
3639 {
3640 main_start_gui();
3641 #ifdef FEAT_GUI
3642@@ -1508,7 +1510,8 @@
3643 early_arg_scan(parmp)
3644 mparm_T *parmp;
3645 {
3646-#if defined(FEAT_XCLIPBOARD) || defined(FEAT_CLIENTSERVER)
3647+#if defined(FEAT_XCLIPBOARD) || defined(FEAT_CLIENTSERVER) \
3648+ || !defined(FEAT_NETBEANS_INTG)
3649 int argc = parmp->argc;
3650 char **argv = parmp->argv;
3651 int i;
3652@@ -1580,6 +1583,14 @@
3653 else if (STRICMP(argv[i], "--echo-wid") == 0)
3654 echo_wid_arg = TRUE;
3655 # endif
3656+# ifndef FEAT_NETBEANS_INTG
3657+ else if (strncmp(argv[i], "-nb", (size_t)3) == 0)
3658+ {
3659+ mch_errmsg(_("'-nb' cannot be used: not enabled at compile time\n"));
3660+ mch_exit(2);
3661+ }
3662+# endif
3663+
3664 }
3665 #endif
3666 }
3667@@ -2361,7 +2372,7 @@
3668 * Is there any other system that cannot do this?
3669 */
3670 close(0);
3671- dup(2);
3672+ ignored = dup(2);
3673 #endif
3674 }
3675
3676diff -Naur vim72.orig/src/mark.c vim72/src/mark.c
3677--- vim72.orig/src/mark.c 2008-08-08 15:06:49.000000000 -0700
[61a83e8]3678+++ vim72/src/mark.c 2009-02-15 23:26:29.540021232 -0800
[76dd250]3679@@ -1627,15 +1627,17 @@
3680
3681 /*
3682 * Handle marks in the viminfo file:
3683- * fp_out == NULL read marks for current buffer only
3684- * fp_out != NULL copy marks for buffers not in buffer list
3685+ * fp_out != NULL: copy marks for buffers not in buffer list
3686+ * fp_out == NULL && (flags & VIF_WANT_MARKS): read marks for curbuf only
3687+ * fp_out == NULL && (flags & VIF_GET_OLDFILES | VIF_FORCEIT): fill v:oldfiles
3688 */
3689 void
3690-copy_viminfo_marks(virp, fp_out, count, eof)
3691+copy_viminfo_marks(virp, fp_out, count, eof, flags)
3692 vir_T *virp;
3693 FILE *fp_out;
3694 int count;
3695 int eof;
3696+ int flags;
3697 {
3698 char_u *line = virp->vir_line;
3699 buf_T *buf;
3700@@ -1647,10 +1649,23 @@
3701 char_u *p;
3702 char_u *name_buf;
3703 pos_T pos;
3704+#ifdef FEAT_EVAL
3705+ list_T *list = NULL;
3706+#endif
3707
3708 if ((name_buf = alloc(LSIZE)) == NULL)
3709 return;
3710 *name_buf = NUL;
3711+
3712+#ifdef FEAT_EVAL
3713+ if (fp_out == NULL && (flags & (VIF_GET_OLDFILES | VIF_FORCEIT)))
3714+ {
3715+ list = list_alloc();
3716+ if (list != NULL)
3717+ set_vim_var_list(VV_OLDFILES, list);
3718+ }
3719+#endif
3720+
3721 num_marked_files = get_viminfo_parameter('\'');
3722 while (!eof && (count < num_marked_files || fp_out == NULL))
3723 {
3724@@ -1681,6 +1696,11 @@
3725 p++;
3726 *p = NUL;
3727
3728+#ifdef FEAT_EVAL
3729+ if (list != NULL)
3730+ list_append_string(list, str, -1);
3731+#endif
3732+
3733 /*
3734 * If fp_out == NULL, load marks for current buffer.
3735 * If fp_out != NULL, copy marks for buffers not in buflist.
3736@@ -1688,7 +1708,7 @@
3737 load_marks = copy_marks_out = FALSE;
3738 if (fp_out == NULL)
3739 {
3740- if (curbuf->b_ffname != NULL)
3741+ if ((flags & VIF_WANT_MARKS) && curbuf->b_ffname != NULL)
3742 {
3743 if (*name_buf == NUL) /* only need to do this once */
3744 home_replace(NULL, curbuf->b_ffname, name_buf, LSIZE, TRUE);
3745diff -Naur vim72.orig/src/mbyte.c vim72/src/mbyte.c
3746--- vim72.orig/src/mbyte.c 2008-07-14 05:38:05.000000000 -0700
[61a83e8]3747+++ vim72/src/mbyte.c 2009-02-15 23:27:36.152289705 -0800
[76dd250]3748@@ -717,7 +717,7 @@
3749 * where mblen() returns 0 for invalid character.
3750 * Therefore, following condition includes 0.
3751 */
3752- (void)mblen(NULL, 0); /* First reset the state. */
3753+ ignored = mblen(NULL, 0); /* First reset the state. */
3754 if (mblen(buf, (size_t)1) <= 0)
3755 n = 2;
3756 else
3757@@ -2540,7 +2540,6 @@
3758 return (int)(p - q);
3759 }
3760
3761-#if defined(FEAT_EVAL) || defined(PROTO)
3762 /*
3763 * Copy a character from "*fp" to "*tp" and advance the pointers.
3764 */
3765@@ -2555,7 +2554,6 @@
3766 *tp += l;
3767 *fp += l;
3768 }
3769-#endif
3770
3771 /*
3772 * Return the offset from "p" to the first byte of a character. When "p" is
3773@@ -3133,7 +3131,7 @@
3774 else
3775 s = p + 1;
3776 }
3777- for (i = 0; s[i] != NUL && s + i < buf + sizeof(buf) - 1; ++i)
3778+ for (i = 0; s[i] != NUL && i < sizeof(buf) - 1; ++i)
3779 {
3780 if (s[i] == '_' || s[i] == '-')
3781 buf[i] = '-';
3782@@ -5280,7 +5278,7 @@
3783
3784 /*ARGSUSED*/
3785 static void
3786-preedit_start_cbproc(XIC xic, XPointer client_data, XPointer call_data)
3787+preedit_start_cbproc(XIC thexic, XPointer client_data, XPointer call_data)
3788 {
3789 #ifdef XIM_DEBUG
3790 xim_log("xim_decide_input_style()\n");
3791@@ -5314,7 +5312,7 @@
3792
3793 /*ARGSUSED*/
3794 static void
3795-preedit_draw_cbproc(XIC xic, XPointer client_data, XPointer call_data)
3796+preedit_draw_cbproc(XIC thexic, XPointer client_data, XPointer call_data)
3797 {
3798 XIMPreeditDrawCallbackStruct *draw_data;
3799 XIMText *text;
3800@@ -5386,7 +5384,7 @@
3801 draw_feedback = (char *)alloc(draw_data->chg_first
3802 + text->length);
3803 else
3804- draw_feedback = realloc(draw_feedback,
3805+ draw_feedback = vim_realloc(draw_feedback,
3806 draw_data->chg_first + text->length);
3807 if (draw_feedback != NULL)
3808 {
3809@@ -5455,7 +5453,7 @@
3810
3811 /*ARGSUSED*/
3812 static void
3813-preedit_caret_cbproc(XIC xic, XPointer client_data, XPointer call_data)
3814+preedit_caret_cbproc(XIC thexic, XPointer client_data, XPointer call_data)
3815 {
3816 #ifdef XIM_DEBUG
3817 xim_log("preedit_caret_cbproc()\n");
3818@@ -5464,7 +5462,7 @@
3819
3820 /*ARGSUSED*/
3821 static void
3822-preedit_done_cbproc(XIC xic, XPointer client_data, XPointer call_data)
3823+preedit_done_cbproc(XIC thexic, XPointer client_data, XPointer call_data)
3824 {
3825 #ifdef XIM_DEBUG
3826 xim_log("preedit_done_cbproc()\n");
3827diff -Naur vim72.orig/src/menu.c vim72/src/menu.c
3828--- vim72.orig/src/menu.c 2008-06-21 12:53:43.000000000 -0700
[61a83e8]3829+++ vim72/src/menu.c 2009-02-15 23:25:01.126353959 -0800
[76dd250]3830@@ -1120,6 +1120,7 @@
3831 parent = menu;
3832 menu = menu->children;
3833 }
3834+ vim_free(path_name);
3835
3836 /* Now we have found the matching menu, and we list the mappings */
3837 /* Highlight title */
3838diff -Naur vim72.orig/src/message.c vim72/src/message.c
3839--- vim72.orig/src/message.c 2008-07-09 11:24:55.000000000 -0700
[61a83e8]3840+++ vim72/src/message.c 2009-02-15 23:30:06.305911160 -0800
3841@@ -3309,7 +3309,10 @@
3842 {
3843 c = gui_mch_dialog(type, title, message, buttons, dfltbutton,
3844 textfield);
3845- msg_end_prompt();
3846+ /* avoid a hit-enter prompt without clearing the cmdline */
3847+ need_wait_return = FALSE;
3848+ emsg_on_display = FALSE;
3849+ cmdline_row = msg_row;
3850
3851 /* Flush output to avoid that further messages and redrawing is done
3852 * in the wrong order. */
3853@@ -4556,7 +4559,13 @@
[7352c10]3854 remove_trailing_zeroes = TRUE;
3855 }
3856
3857- if (fmt_spec == 'f' && abs_f > 1.0e307)
3858+ if (fmt_spec == 'f' &&
3859+#ifdef VAX
3860+ abs_f > 1.0e38
3861+#else
3862+ abs_f > 1.0e307
3863+#endif
3864+ )
3865 {
3866 /* Avoid a buffer overflow */
3867 strcpy(tmp, "inf");
[61a83e8]3868@@ -4585,61 +4594,62 @@
[76dd250]3869 if (remove_trailing_zeroes)
3870 {
3871 int i;
3872- char *p;
3873+ char *tp;
3874
3875 /* Using %g or %G: remove superfluous zeroes. */
3876 if (fmt_spec == 'f')
3877- p = tmp + str_arg_l - 1;
3878+ tp = tmp + str_arg_l - 1;
3879 else
3880 {
3881- p = (char *)vim_strchr((char_u *)tmp,
3882+ tp = (char *)vim_strchr((char_u *)tmp,
3883 fmt_spec == 'e' ? 'e' : 'E');
3884- if (p != NULL)
3885+ if (tp != NULL)
3886 {
3887 /* Remove superfluous '+' and leading
3888 * zeroes from the exponent. */
3889- if (p[1] == '+')
3890+ if (tp[1] == '+')
3891 {
3892 /* Change "1.0e+07" to "1.0e07" */
3893- STRMOVE(p + 1, p + 2);
3894+ STRMOVE(tp + 1, tp + 2);
3895 --str_arg_l;
3896 }
3897- i = (p[1] == '-') ? 2 : 1;
3898- while (p[i] == '0')
3899+ i = (tp[1] == '-') ? 2 : 1;
3900+ while (tp[i] == '0')
3901 {
3902 /* Change "1.0e07" to "1.0e7" */
3903- STRMOVE(p + i, p + i + 1);
3904+ STRMOVE(tp + i, tp + i + 1);
3905 --str_arg_l;
3906 }
3907- --p;
3908+ --tp;
3909 }
3910 }
3911
3912- if (p != NULL && !precision_specified)
3913+ if (tp != NULL && !precision_specified)
3914 /* Remove trailing zeroes, but keep the one
3915 * just after a dot. */
3916- while (p > tmp + 2 && *p == '0' && p[-1] != '.')
3917+ while (tp > tmp + 2 && *tp == '0'
3918+ && tp[-1] != '.')
3919 {
3920- STRMOVE(p, p + 1);
3921- --p;
3922+ STRMOVE(tp, tp + 1);
3923+ --tp;
3924 --str_arg_l;
3925 }
3926 }
3927 else
3928 {
3929- char *p;
3930+ char *tp;
3931
3932 /* Be consistent: some printf("%e") use 1.0e+12
3933 * and some 1.0e+012. Remove one zero in the last
3934 * case. */
3935- p = (char *)vim_strchr((char_u *)tmp,
3936+ tp = (char *)vim_strchr((char_u *)tmp,
3937 fmt_spec == 'e' ? 'e' : 'E');
3938- if (p != NULL && (p[1] == '+' || p[1] == '-')
3939- && p[2] == '0'
3940- && vim_isdigit(p[3])
3941- && vim_isdigit(p[4]))
3942+ if (tp != NULL && (tp[1] == '+' || tp[1] == '-')
3943+ && tp[2] == '0'
3944+ && vim_isdigit(tp[3])
3945+ && vim_isdigit(tp[4]))
3946 {
3947- STRMOVE(p + 2, p + 3);
3948+ STRMOVE(tp + 2, tp + 3);
3949 --str_arg_l;
3950 }
3951 }
3952diff -Naur vim72.orig/src/misc1.c vim72/src/misc1.c
3953--- vim72.orig/src/misc1.c 2008-07-12 12:20:53.000000000 -0700
[61a83e8]3954+++ vim72/src/misc1.c 2009-02-15 23:26:29.540021232 -0800
[76dd250]3955@@ -3245,9 +3245,9 @@
3956
3957 /* When using ":silent" assume that <CR> was entered. */
3958 if (mouse_used != NULL)
3959- MSG_PUTS(_("Type number or click with mouse (<Enter> cancels): "));
3960+ MSG_PUTS(_("Type number and <Enter> or click with mouse (empty cancels): "));
3961 else
3962- MSG_PUTS(_("Choice number (<Enter> cancels): "));
3963+ MSG_PUTS(_("Type number and <Enter> (empty cancels): "));
3964
3965 /* Set the state such that text can be selected/copied/pasted and we still
3966 * get mouse events. */
3967diff -Naur vim72.orig/src/misc2.c vim72/src/misc2.c
3968--- vim72.orig/src/misc2.c 2008-07-23 12:12:56.000000000 -0700
[61a83e8]3969+++ vim72/src/misc2.c 2009-02-15 23:29:09.750285235 -0800
[76dd250]3970@@ -873,7 +873,7 @@
3971 /* 3. check for available memory: call mch_avail_mem() */
3972 if (mch_avail_mem(TRUE) < KEEP_ROOM && !releasing)
3973 {
3974- vim_free((char *)p); /* System is low... no go! */
3975+ free((char *)p); /* System is low... no go! */
3976 p = NULL;
3977 }
3978 else
3979@@ -1257,7 +1257,6 @@
3980 return escaped_string;
3981 }
3982
3983-#if !defined(BACKSLASH_IN_FILENAME) || defined(FEAT_EVAL) || defined(PROTO)
3984 /*
3985 * Return TRUE when 'shell' has "csh" in the tail.
3986 */
3987@@ -1266,9 +1265,7 @@
3988 {
3989 return (strstr((char *)gettail(p_sh), "csh") != NULL);
3990 }
3991-#endif
3992
3993-#if defined(FEAT_EVAL) || defined(PROTO)
3994 /*
3995 * Escape "string" for use as a shell argument with system().
3996 * This uses single quotes, except when we know we need to use double qoutes
3997@@ -1391,7 +1388,6 @@
3998
3999 return escaped_string;
4000 }
4001-#endif
4002
4003 /*
4004 * Like vim_strsave(), but make all characters uppercase.
[1f22c7c]4005@@ -2565,7 +2561,7 @@
4006 int key;
4007 int dlen = 0;
4008
4009- key = find_special_key(srcp, &modifiers, keycode);
4010+ key = find_special_key(srcp, &modifiers, keycode, FALSE);
4011 if (key == 0)
4012 return 0;
4013
4014@@ -2601,10 +2597,11 @@
4015 * returns 0 if there is no match.
4016 */
4017 int
4018-find_special_key(srcp, modp, keycode)
4019+find_special_key(srcp, modp, keycode, keep_x_key)
4020 char_u **srcp;
4021 int *modp;
4022- int keycode; /* prefer key code, e.g. K_DEL instead of DEL */
4023+ int keycode; /* prefer key code, e.g. K_DEL instead of DEL */
4024+ int keep_x_key; /* don't translate xHome to Home key */
4025 {
4026 char_u *last_dash;
4027 char_u *end_of_name;
4028@@ -2672,7 +2669,8 @@
4029 else
4030 {
4031 key = get_special_key_code(last_dash + 1);
4032- key = handle_x_keys(key);
4033+ if (!keep_x_key)
4034+ key = handle_x_keys(key);
4035 }
4036
4037 /*
[5f4a45c9]4038@@ -4698,7 +4696,8 @@
4039 stackp->ffs_filearray_cur = i + 1;
4040 ff_push(search_ctx, stackp);
4041
4042- simplify_filename(file_path);
4043+ if (!path_with_url(file_path))
4044+ simplify_filename(file_path);
4045 if (mch_dirname(ff_expand_buffer, MAXPATHL)
4046 == OK)
4047 {
[76dd250]4048diff -Naur vim72.orig/src/move.c vim72/src/move.c
4049--- vim72.orig/src/move.c 2008-07-12 09:26:47.000000000 -0700
[61a83e8]4050+++ vim72/src/move.c 2009-02-15 23:26:58.897901382 -0800
[76dd250]4051@@ -280,18 +280,20 @@
4052
4053 if (curwin->w_botline <= curbuf->b_ml.ml_line_count)
4054 {
4055- if (curwin->w_cursor.lnum < curwin->w_botline
4056- && ((long)curwin->w_cursor.lnum
4057+ if (curwin->w_cursor.lnum < curwin->w_botline)
4058+ {
4059+ if (((long)curwin->w_cursor.lnum
4060 >= (long)curwin->w_botline - p_so
4061 #ifdef FEAT_FOLDING
4062 || hasAnyFolding(curwin)
4063 #endif
4064 ))
4065- {
4066+ {
4067 lineoff_T loff;
4068
4069- /* Cursor is above botline, check if there are 'scrolloff'
4070- * window lines below the cursor. If not, need to scroll. */
4071+ /* Cursor is (a few lines) above botline, check if there are
4072+ * 'scrolloff' window lines below the cursor. If not, need to
4073+ * scroll. */
4074 n = curwin->w_empty_rows;
4075 loff.lnum = curwin->w_cursor.lnum;
4076 #ifdef FEAT_FOLDING
4077@@ -317,6 +319,10 @@
4078 if (n >= p_so)
4079 /* sufficient context, no need to scroll */
4080 check_botline = FALSE;
4081+ }
4082+ else
4083+ /* sufficient context, no need to scroll */
4084+ check_botline = FALSE;
4085 }
4086 if (check_botline)
4087 {
4088@@ -509,6 +515,9 @@
4089 /* Approximate the value of w_botline */
4090 wp->w_botline += lnum - wp->w_topline;
4091 wp->w_topline = lnum;
4092+#ifdef FEAT_AUTOCMD
4093+ wp->w_topline_was_set = TRUE;
4094+#endif
4095 #ifdef FEAT_DIFF
4096 wp->w_topfill = 0;
4097 #endif
4098diff -Naur vim72.orig/src/netbeans.c vim72/src/netbeans.c
4099--- vim72.orig/src/netbeans.c 2008-07-13 09:19:54.000000000 -0700
[61a83e8]4100+++ vim72/src/netbeans.c 2009-02-15 23:28:48.048896773 -0800
[76dd250]4101@@ -1043,7 +1043,7 @@
4102 nbdebug(("EVT: %s", buf));
4103 /* nb_send(buf, "netbeans_end"); avoid "write failed" messages */
4104 if (sd >= 0)
4105- sock_write(sd, buf, (int)STRLEN(buf)); /* ignore errors */
4106+ ignored = sock_write(sd, buf, (int)STRLEN(buf));
4107 }
4108 }
4109
4110@@ -2277,9 +2277,6 @@
4111 int serNum;
4112 int localTypeNum;
4113 int typeNum;
4114-# ifdef NBDEBUG
4115- int len;
4116-# endif
4117 pos_T *pos;
4118
4119 if (buf == NULL || buf->bufp == NULL)
4120@@ -2303,13 +2300,10 @@
4121 pos = get_off_or_lnum(buf->bufp, &args);
4122
4123 cp = (char *)args;
4124-# ifdef NBDEBUG
4125- len =
4126-# endif
4127- strtol(cp, &cp, 10);
4128+ ignored = (int)strtol(cp, &cp, 10);
4129 args = (char_u *)cp;
4130 # ifdef NBDEBUG
4131- if (len != -1)
4132+ if (ignored != -1)
4133 {
4134 nbdebug((" partial line annotation -- Not Yet Implemented!\n"));
4135 }
[43c52a1]4136@@ -2924,44 +2918,26 @@
4137 }
4138
4139 /*
4140- * Tell netbeans a file was closed.
4141+ * Tell netbeans that a file was deleted or wiped out.
4142 */
4143 void
4144-netbeans_file_closed(buf_T *bufp)
4145+netbeans_file_killed(buf_T *bufp)
4146 {
4147 int bufno = nb_getbufno(bufp);
4148 nbbuf_T *nbbuf = nb_get_buf(bufno);
4149 char buffer[2*MAXPATHL];
4150
4151- if (!haveConnection || bufno < 0)
4152- return;
4153-
4154- if (!netbeansCloseFile)
4155- {
4156- nbdebug(("Ignoring file_closed for %s. File was closed from IDE\n",
4157- bufp->b_ffname));
4158+ if (!haveConnection || bufno == -1)
4159 return;
4160- }
4161-
4162- nbdebug(("netbeans_file_closed:\n"));
4163- nbdebug((" Closing bufno: %d", bufno));
4164- if (curbuf != NULL && curbuf != bufp)
4165- {
4166- nbdebug((" Curbuf bufno: %d\n", nb_getbufno(curbuf)));
4167- }
4168- else if (curbuf == bufp)
4169- {
4170- nbdebug((" curbuf == bufp\n"));
4171- }
4172
4173- if (bufno <= 0)
4174- return;
4175+ nbdebug(("netbeans_file_killed:\n"));
4176+ nbdebug((" Killing bufno: %d", bufno));
4177
4178 sprintf(buffer, "%d:killed=%d\n", bufno, r_cmdno);
4179
4180 nbdebug(("EVT: %s", buffer));
4181
4182- nb_send(buffer, "netbeans_file_closed");
4183+ nb_send(buffer, "netbeans_file_killed");
4184
4185 if (nbbuf != NULL)
4186 nbbuf->bufp = NULL;
[76dd250]4187diff -Naur vim72.orig/src/normal.c vim72/src/normal.c
4188--- vim72.orig/src/normal.c 2008-07-31 13:03:08.000000000 -0700
[61a83e8]4189+++ vim72/src/normal.c 2009-02-15 23:29:35.431930716 -0800
[76dd250]4190@@ -183,6 +183,8 @@
4191 static void nv_cursorhold __ARGS((cmdarg_T *cap));
4192 #endif
4193
4194+static char *e_noident = N_("E349: No identifier under cursor");
4195+
4196 /*
4197 * Function to be called for a Normal or Visual mode command.
4198 * The argument is a cmdarg_T.
4199@@ -578,6 +580,9 @@
4200 static int old_mapped_len = 0;
4201 #endif
4202 int idx;
4203+#ifdef FEAT_EVAL
4204+ int set_prevcount = FALSE;
4205+#endif
4206
4207 vim_memset(&ca, 0, sizeof(ca)); /* also resets ca.retval */
4208 ca.oap = oap;
4209@@ -613,7 +618,12 @@
4210 /* When not finishing an operator and no register name typed, reset the
4211 * count. */
4212 if (!finish_op && !oap->regname)
4213+ {
4214 ca.opcount = 0;
4215+#ifdef FEAT_EVAL
4216+ set_prevcount = TRUE;
4217+#endif
4218+ }
4219
4220 #ifdef FEAT_AUTOCMD
4221 /* Restore counts from before receiving K_CURSORHOLD. This means after
4222@@ -717,7 +727,15 @@
4223 * command, so that v:count can be used in an expression mapping
4224 * right after the count. */
4225 if (toplevel && stuff_empty())
4226- set_vcount(ca.count0, ca.count0 == 0 ? 1 : ca.count0);
4227+ {
4228+ long count = ca.count0;
4229+
4230+ /* multiply with ca.opcount the same way as below */
4231+ if (ca.opcount != 0)
4232+ count = ca.opcount * (count == 0 ? 1 : count);
4233+ set_vcount(count, count == 0 ? 1 : count, set_prevcount);
4234+ set_prevcount = FALSE; /* only set v:prevcount once */
4235+ }
4236 #endif
4237 if (ctrl_w)
4238 {
4239@@ -804,7 +822,7 @@
4240 * Only set v:count when called from main() and not a stuffed command.
4241 */
4242 if (toplevel && stuff_empty())
4243- set_vcount(ca.count0, ca.count1);
4244+ set_vcount(ca.count0, ca.count1, set_prevcount);
4245 #endif
4246
4247 /*
4248@@ -1132,7 +1150,8 @@
4249 out_flush();
4250 #endif
4251 #ifdef FEAT_AUTOCMD
4252- did_cursorhold = FALSE;
4253+ if (ca.cmdchar != K_IGNORE)
4254+ did_cursorhold = FALSE;
4255 #endif
4256
4257 State = NORMAL;
4258@@ -3509,7 +3528,7 @@
4259 if (find_type & FIND_STRING)
4260 EMSG(_("E348: No string under cursor"));
4261 else
4262- EMSG(_("E349: No identifier under cursor"));
4263+ EMSG(_(e_noident));
4264 return 0;
4265 }
4266 ptr += col;
4267@@ -5469,6 +5488,20 @@
4268 STRCPY(buf, "he! ");
4269 else
4270 {
4271+ /* An external command will probably use an argument starting
4272+ * with "-" as an option. To avoid trouble we skip the "-". */
4273+ while (*ptr == '-' && n > 0)
4274+ {
4275+ ++ptr;
4276+ --n;
4277+ }
4278+ if (n == 0)
4279+ {
4280+ EMSG(_(e_noident)); /* found dashes only */
4281+ vim_free(buf);
4282+ return;
4283+ }
4284+
4285 /* When a count is given, turn it into a range. Is this
4286 * really what we want? */
4287 isman = (STRCMP(kp, "man") == 0);
4288@@ -5511,37 +5544,59 @@
4289 /*
4290 * Now grab the chars in the identifier
4291 */
4292- if (cmdchar == '*')
4293- aux_ptr = (char_u *)(p_magic ? "/.*~[^$\\" : "/^$\\");
4294- else if (cmdchar == '#')
4295- aux_ptr = (char_u *)(p_magic ? "/?.*~[^$\\" : "/?^$\\");
4296- else if (cmdchar == 'K' && !kp_help)
4297- aux_ptr = (char_u *)" \t\\\"|!";
4298- else
4299- /* Don't escape spaces and Tabs in a tag with a backslash */
4300- aux_ptr = (char_u *)"\\|\"";
4301-
4302- p = buf + STRLEN(buf);
4303- while (n-- > 0)
4304- {
4305- /* put a backslash before \ and some others */
4306- if (vim_strchr(aux_ptr, *ptr) != NULL)
4307- *p++ = '\\';
4308-#ifdef FEAT_MBYTE
4309- /* When current byte is a part of multibyte character, copy all bytes
4310- * of that character. */
4311- if (has_mbyte)
4312+ if (cmdchar == 'K' && !kp_help)
4313+ {
4314+ /* Escape the argument properly for a shell command */
4315+ ptr = vim_strnsave(ptr, n);
4316+ p = vim_strsave_shellescape(ptr, TRUE);
4317+ vim_free(ptr);
4318+ if (p == NULL)
4319 {
4320- int i;
4321- int len = (*mb_ptr2len)(ptr) - 1;
4322-
4323- for (i = 0; i < len && n >= 1; ++i, --n)
4324- *p++ = *ptr++;
4325+ vim_free(buf);
4326+ return;
4327 }
4328+ buf = (char_u *)vim_realloc(buf, STRLEN(buf) + STRLEN(p) + 1);
4329+ if (buf == NULL)
4330+ {
4331+ vim_free(buf);
4332+ vim_free(p);
4333+ return;
4334+ }
4335+ STRCAT(buf, p);
4336+ vim_free(p);
4337+ }
4338+ else
4339+ {
4340+ if (cmdchar == '*')
4341+ aux_ptr = (char_u *)(p_magic ? "/.*~[^$\\" : "/^$\\");
4342+ else if (cmdchar == '#')
4343+ aux_ptr = (char_u *)(p_magic ? "/?.*~[^$\\" : "/?^$\\");
4344+ else
4345+ /* Don't escape spaces and Tabs in a tag with a backslash */
4346+ aux_ptr = (char_u *)"\\|\"\n*?[";
4347+
4348+ p = buf + STRLEN(buf);
4349+ while (n-- > 0)
4350+ {
4351+ /* put a backslash before \ and some others */
4352+ if (vim_strchr(aux_ptr, *ptr) != NULL)
4353+ *p++ = '\\';
4354+#ifdef FEAT_MBYTE
4355+ /* When current byte is a part of multibyte character, copy all
4356+ * bytes of that character. */
4357+ if (has_mbyte)
4358+ {
4359+ int i;
4360+ int len = (*mb_ptr2len)(ptr) - 1;
4361+
4362+ for (i = 0; i < len && n >= 1; ++i, --n)
4363+ *p++ = *ptr++;
4364+ }
4365 #endif
4366- *p++ = *ptr++;
4367+ *p++ = *ptr++;
4368+ }
4369+ *p = NUL;
4370 }
4371- *p = NUL;
4372
4373 /*
4374 * Execute the command.
[9a875fd]4375@@ -6728,6 +6783,8 @@
4376 /* Visual mode "r" */
4377 if (VIsual_active)
4378 {
4379+ if (got_int)
4380+ reset_VIsual();
4381 nv_operator(cap);
4382 return;
4383 }
4384@@ -7784,7 +7841,7 @@
4385 else
4386 i = curwin->w_leftcol;
4387 /* Go to the middle of the screen line. When 'number' is on and lines
4388- * are wrapping the middle can be more to the left.*/
4389+ * are wrapping the middle can be more to the left. */
4390 if (cap->nchar == 'm')
4391 i += (W_WIDTH(curwin) - curwin_col_off()
4392 + ((curwin->w_p_wrap && i > 0)
[76dd250]4393diff -Naur vim72.orig/src/ops.c vim72/src/ops.c
4394--- vim72.orig/src/ops.c 2008-06-21 13:08:59.000000000 -0700
[61a83e8]4395+++ vim72/src/ops.c 2009-02-15 23:28:04.942134376 -0800
[76dd250]4396@@ -2209,12 +2209,15 @@
4397 {
4398 for (; pos.lnum <= oap->end.lnum; ++pos.lnum)
4399 {
4400+ int one_change;
4401+
4402 block_prep(oap, &bd, pos.lnum, FALSE);
4403 pos.col = bd.textcol;
4404- did_change = swapchars(oap->op_type, &pos, bd.textlen);
4405+ one_change = swapchars(oap->op_type, &pos, bd.textlen);
4406+ did_change |= one_change;
4407
4408 # ifdef FEAT_NETBEANS_INTG
4409- if (usingNetbeans && did_change)
4410+ if (usingNetbeans && one_change)
4411 {
4412 char_u *ptr = ml_get_buf(curbuf, pos.lnum, FALSE);
4413
4414diff -Naur vim72.orig/src/option.c vim72/src/option.c
4415--- vim72.orig/src/option.c 2008-07-18 06:05:33.000000000 -0700
[61a83e8]4416+++ vim72/src/option.c 2009-02-15 23:30:11.834265120 -0800
[76dd250]4417@@ -2593,13 +2593,13 @@
4418 #ifdef FEAT_VIMINFO
4419 (char_u *)&p_viminfo, PV_NONE,
4420 #if defined(MSDOS) || defined(MSWIN) || defined(OS2)
4421- {(char_u *)"", (char_u *)"'20,<50,s10,h,rA:,rB:"}
4422+ {(char_u *)"", (char_u *)"'100,<50,s10,h,rA:,rB:"}
4423 #else
4424 # ifdef AMIGA
4425 {(char_u *)"",
4426- (char_u *)"'20,<50,s10,h,rdf0:,rdf1:,rdf2:"}
4427+ (char_u *)"'100,<50,s10,h,rdf0:,rdf1:,rdf2:"}
4428 # else
4429- {(char_u *)"", (char_u *)"'20,<50,s10,h"}
4430+ {(char_u *)"", (char_u *)"'100,<50,s10,h"}
4431 # endif
4432 #endif
4433 #else
[61a83e8]4434@@ -4119,11 +4119,23 @@
4435 && options[opt_idx].var == VAR_WIN)
4436 goto skip;
4437
4438- /* Disallow changing some options from modelines */
4439- if ((opt_flags & OPT_MODELINE) && (flags & P_SECURE))
4440+ /* Disallow changing some options from modelines. */
4441+ if (opt_flags & OPT_MODELINE)
4442 {
4443- errmsg = (char_u *)_("E520: Not allowed in a modeline");
4444- goto skip;
4445+ if (flags & P_SECURE)
4446+ {
4447+ errmsg = (char_u *)_("E520: Not allowed in a modeline");
4448+ goto skip;
4449+ }
4450+#ifdef FEAT_DIFF
4451+ /* In diff mode some options are overruled. This avoids that
4452+ * 'foldmethod' becomes "marker" instead of "diff" and that
4453+ * "wrap" gets set. */
4454+ if (curwin->w_p_diff
4455+ && (options[opt_idx].indir == PV_FDM
4456+ || options[opt_idx].indir == PV_WRAP))
4457+ goto skip;
4458+#endif
4459 }
4460
4461 #ifdef HAVE_SANDBOX
4462@@ -5268,6 +5280,21 @@
4463 }
4464 #endif
4465
4466+#ifdef FEAT_TITLE
4467+static void redraw_titles __ARGS((void));
4468+
4469+/*
4470+ * Redraw the window title and/or tab page text later.
4471+ */
4472+static void redraw_titles()
4473+{
4474+ need_maketitle = TRUE;
4475+# ifdef FEAT_WINDOWS
4476+ redraw_tabline = TRUE;
4477+# endif
4478+}
4479+#endif
4480+
4481 /*
4482 * Set a string option to a new value (without checking the effect).
4483 * The string is copied into allocated memory.
4484@@ -5407,6 +5434,10 @@
[9a875fd]4485 int did_chartab = FALSE;
4486 char_u **gvarp;
4487 long_u free_oldval = (options[opt_idx].flags & P_ALLOCED);
4488+#ifdef FEAT_GUI
4489+ /* set when changing an option that only requires a redraw in the GUI */
4490+ int redraw_gui_only = FALSE;
4491+#endif
4492
4493 /* Get the global option to compare with, otherwise we would have to check
4494 * two values for all local options. */
[61a83e8]4495@@ -5668,7 +5699,7 @@
4496 {
4497 # ifdef FEAT_TITLE
4498 /* May show a "+" in the title now. */
4499- need_maketitle = TRUE;
4500+ redraw_titles();
4501 # endif
4502 /* Add 'fileencoding' to the swap file. */
4503 ml_setflags(curbuf);
4504@@ -5687,7 +5718,7 @@
4505 {
4506 errmsg = mb_init();
4507 # ifdef FEAT_TITLE
4508- need_maketitle = TRUE;
4509+ redraw_titles();
4510 # endif
4511 }
4512 }
4513@@ -5796,7 +5827,7 @@
4514 else
4515 curbuf->b_p_tx = FALSE;
4516 #ifdef FEAT_TITLE
4517- need_maketitle = TRUE;
4518+ redraw_titles();
4519 #endif
4520 /* update flag in swap file */
4521 ml_setflags(curbuf);
4522@@ -6055,6 +6086,7 @@
[9a875fd]4523 errmsg = (char_u *)N_("E596: Invalid font(s)");
4524 }
4525 }
4526+ redraw_gui_only = TRUE;
4527 }
4528 # ifdef FEAT_XFONTSET
4529 else if (varp == &p_guifontset)
[61a83e8]4530@@ -6063,6 +6095,7 @@
[9a875fd]4531 errmsg = (char_u *)N_("E597: can't select fontset");
4532 else if (gui.in_use && gui_init_font(p_guifontset, TRUE) != OK)
4533 errmsg = (char_u *)N_("E598: Invalid fontset");
4534+ redraw_gui_only = TRUE;
4535 }
4536 # endif
4537 # ifdef FEAT_MBYTE
[61a83e8]4538@@ -6072,6 +6105,7 @@
[9a875fd]4539 errmsg = (char_u *)N_("E533: can't select wide font");
4540 else if (gui_get_wide_font() == FAIL)
4541 errmsg = (char_u *)N_("E534: Invalid wide font");
4542+ redraw_gui_only = TRUE;
4543 }
4544 # endif
4545 #endif
[61a83e8]4546@@ -6133,13 +6167,24 @@
[9a875fd]4547 #ifdef FEAT_GUI
4548 /* 'guioptions' */
4549 else if (varp == &p_go)
4550+ {
4551 gui_init_which_components(oldval);
4552+ redraw_gui_only = TRUE;
4553+ }
4554 #endif
4555
4556 #if defined(FEAT_GUI_TABLINE)
4557 /* 'guitablabel' */
4558 else if (varp == &p_gtl)
4559+ {
4560 redraw_tabline = TRUE;
4561+ redraw_gui_only = TRUE;
4562+ }
4563+ /* 'guitabtooltip' */
4564+ else if (varp == &p_gtt)
4565+ {
4566+ redraw_gui_only = TRUE;
4567+ }
4568 #endif
4569
4570 #if defined(FEAT_MOUSE_TTY) && (defined(UNIX) || defined(VMS))
[61a83e8]4571@@ -6717,7 +6762,11 @@
[9a875fd]4572
4573 if (curwin->w_curswant != MAXCOL)
4574 curwin->w_set_curswant = TRUE; /* in case 'showbreak' changed */
4575- check_redraw(options[opt_idx].flags);
4576+#ifdef FEAT_GUI
4577+ /* check redraw when it's not a GUI option or the GUI is active. */
4578+ if (!redraw_gui_only || gui.in_use)
4579+#endif
4580+ check_redraw(options[opt_idx].flags);
4581
4582 return errmsg;
4583 }
[61a83e8]4584@@ -7105,22 +7154,28 @@
4585 curbuf->b_did_warn = FALSE;
4586
4587 #ifdef FEAT_TITLE
4588- need_maketitle = TRUE;
4589+ redraw_titles();
4590 #endif
4591 }
4592
4593 #ifdef FEAT_TITLE
4594 /* when 'modifiable' is changed, redraw the window title */
4595 else if ((int *)varp == &curbuf->b_p_ma)
4596- need_maketitle = TRUE;
4597+ {
4598+ redraw_titles();
4599+ }
4600 /* when 'endofline' is changed, redraw the window title */
4601 else if ((int *)varp == &curbuf->b_p_eol)
4602- need_maketitle = TRUE;
4603-#ifdef FEAT_MBYTE
4604- /* when 'bomb' is changed, redraw the window title */
4605+ {
4606+ redraw_titles();
4607+ }
4608+# ifdef FEAT_MBYTE
4609+ /* when 'bomb' is changed, redraw the window title and tab page text */
4610 else if ((int *)varp == &curbuf->b_p_bomb)
4611- need_maketitle = TRUE;
4612-#endif
4613+ {
4614+ redraw_titles();
4615+ }
4616+# endif
4617 #endif
4618
4619 /* when 'bin' is set also set some other options */
4620@@ -7128,7 +7183,7 @@
4621 {
4622 set_options_bin(old_value, curbuf->b_p_bin, opt_flags);
4623 #ifdef FEAT_TITLE
4624- need_maketitle = TRUE;
4625+ redraw_titles();
4626 #endif
4627 }
4628
4629@@ -7279,7 +7334,7 @@
4630 if (!value)
4631 save_file_ff(curbuf); /* Buffer is unchanged */
4632 #ifdef FEAT_TITLE
4633- need_maketitle = TRUE;
4634+ redraw_titles();
4635 #endif
4636 #ifdef FEAT_AUTOCMD
4637 modified_was_set = value;
4638@@ -7714,7 +7769,7 @@
4639 newFoldLevel();
4640 }
4641
4642- /* 'foldminlevel' */
4643+ /* 'foldminlines' */
4644 else if (pp == &curwin->w_p_fml)
4645 {
4646 foldUpdateAll(curwin);
4647@@ -7974,6 +8029,11 @@
[76dd250]4648 else /* curwin->w_p_scr > curwin->w_height */
4649 curwin->w_p_scr = curwin->w_height;
4650 }
4651+ if (p_hi < 0)
4652+ {
4653+ errmsg = e_positive;
4654+ p_hi = 0;
4655+ }
4656 if (p_report < 0)
4657 {
4658 errmsg = e_positive;
[61a83e8]4659@@ -8227,13 +8287,13 @@
[76dd250]4660 {
4661 if (number == 0 && string != NULL)
4662 {
4663- int index;
4664+ int idx;
4665
4666 /* Either we are given a string or we are setting option
4667 * to zero. */
4668- for (index = 0; string[index] == '0'; ++index)
4669+ for (idx = 0; string[idx] == '0'; ++idx)
4670 ;
4671- if (string[index] != NUL || index == 0)
4672+ if (string[idx] != NUL || idx == 0)
4673 {
4674 /* There's another character after zeros or the string
4675 * is empty. In both cases, we are trying to set a
[61a83e8]4676@@ -8323,7 +8383,7 @@
[1f22c7c]4677 {
4678 --arg; /* put arg at the '<' */
4679 modifiers = 0;
4680- key = find_special_key(&arg, &modifiers, TRUE);
4681+ key = find_special_key(&arg, &modifiers, TRUE, TRUE);
4682 if (modifiers) /* can't handle modifiers here */
4683 key = 0;
4684 }
[76dd250]4685diff -Naur vim72.orig/src/os_unix.c vim72/src/os_unix.c
4686--- vim72.orig/src/os_unix.c 2008-08-06 04:01:40.000000000 -0700
[61a83e8]4687+++ vim72/src/os_unix.c 2009-02-15 23:29:40.908282162 -0800
[76dd250]4688@@ -315,12 +315,15 @@
4689 {-1, "Unknown!", FALSE}
4690 };
4691
4692+/*
4693+ * Write s[len] to the screen.
4694+ */
4695 void
4696 mch_write(s, len)
4697 char_u *s;
4698 int len;
4699 {
4700- write(1, (char *)s, len);
4701+ ignored = (int)write(1, (char *)s, len);
4702 if (p_wd) /* Unix is too fast, slow down a bit more */
4703 RealWaitForChar(read_cmd_fd, p_wd, NULL);
4704 }
4705@@ -2905,7 +2908,7 @@
4706 * Ignore any errors.
4707 */
4708 #if defined(HAVE_SIGALTSTACK) || defined(HAVE_SIGSTACK)
4709- signal_stack = malloc(SIGSTKSZ);
4710+ signal_stack = (char *)alloc(SIGSTKSZ);
4711 init_signal_stack();
4712 #endif
4713 }
4714@@ -2936,7 +2939,8 @@
4715 }
4716 # endif
4717 # endif
4718-# ifdef FEAT_X11
4719+ /* Don't close the display for GTK 1, it is done in exit(). */
4720+# if defined(FEAT_X11) && (!defined(FEAT_GUI_GTK) || defined(HAVE_GTK2))
4721 if (x11_display != NULL
4722 # ifdef FEAT_XCLIPBOARD
4723 && x11_display != xterm_dpy
4724@@ -3926,9 +3930,9 @@
4725 */
4726 if (fd >= 0)
4727 {
4728- dup(fd); /* To replace stdin (file descriptor 0) */
4729- dup(fd); /* To replace stdout (file descriptor 1) */
4730- dup(fd); /* To replace stderr (file descriptor 2) */
4731+ ignored = dup(fd); /* To replace stdin (fd 0) */
4732+ ignored = dup(fd); /* To replace stdout (fd 1) */
4733+ ignored = dup(fd); /* To replace stderr (fd 2) */
4734
4735 /* Don't need this now that we've duplicated it */
4736 close(fd);
[9a875fd]4737@@ -3946,7 +3950,17 @@
4738 * children can be kill()ed. Don't do this when using pipes,
4739 * because stdin is not a tty, we would lose /dev/tty. */
4740 if (p_stmp)
4741+ {
4742 (void)setsid();
4743+# if defined(SIGHUP)
4744+ /* When doing "!xterm&" and 'shell' is bash: the shell
4745+ * will exit and send SIGHUP to all processes in its
4746+ * group, killing the just started process. Ignore SIGHUP
4747+ * to avoid that. (suggested by Simon Schubert)
4748+ */
4749+ signal(SIGHUP, SIG_IGN);
4750+# endif
4751+ }
4752 # endif
4753 # ifdef FEAT_GUI
4754 if (pty_slave_fd >= 0)
4755@@ -3996,13 +4010,13 @@
[76dd250]4756
4757 /* set up stdin/stdout/stderr for the child */
4758 close(0);
4759- dup(pty_slave_fd);
4760+ ignored = dup(pty_slave_fd);
4761 close(1);
4762- dup(pty_slave_fd);
4763+ ignored = dup(pty_slave_fd);
4764 if (gui.in_use)
4765 {
4766 close(2);
4767- dup(pty_slave_fd);
4768+ ignored = dup(pty_slave_fd);
4769 }
4770
4771 close(pty_slave_fd); /* has been dupped, close it now */
[9a875fd]4772@@ -4013,13 +4027,13 @@
[76dd250]4773 /* set up stdin for the child */
4774 close(fd_toshell[1]);
4775 close(0);
4776- dup(fd_toshell[0]);
4777+ ignored = dup(fd_toshell[0]);
4778 close(fd_toshell[0]);
4779
4780 /* set up stdout for the child */
4781 close(fd_fromshell[0]);
4782 close(1);
4783- dup(fd_fromshell[1]);
4784+ ignored = dup(fd_fromshell[1]);
4785 close(fd_fromshell[1]);
4786
4787 # ifdef FEAT_GUI
[9a875fd]4788@@ -4027,7 +4041,7 @@
[76dd250]4789 {
4790 /* set up stderr for the child */
4791 close(2);
4792- dup(1);
4793+ ignored = dup(1);
4794 }
4795 # endif
4796 }
[9a875fd]4797@@ -4158,7 +4172,8 @@
[76dd250]4798 && (lnum !=
4799 curbuf->b_ml.ml_line_count
4800 || curbuf->b_p_eol)))
4801- write(toshell_fd, "\n", (size_t)1);
4802+ ignored = write(toshell_fd, "\n",
4803+ (size_t)1);
4804 ++lnum;
4805 if (lnum > curbuf->b_op_end.lnum)
4806 {
[9a875fd]4807@@ -6814,7 +6829,8 @@
[76dd250]4808 if (xsmp_icefd != -1)
4809 {
4810 SmcCloseConnection(xsmp.smcconn, 0, NULL);
4811- vim_free(xsmp.clientid);
4812+ if (xsmp.clientid != NULL)
4813+ free(xsmp.clientid);
4814 xsmp.clientid = NULL;
4815 xsmp_icefd = -1;
4816 }
4817diff -Naur vim72.orig/src/proto/eval.pro vim72/src/proto/eval.pro
4818--- vim72.orig/src/proto/eval.pro 2008-08-09 07:31:25.000000000 -0700
[61a83e8]4819+++ vim72/src/proto/eval.pro 2009-02-15 23:27:14.702915211 -0800
[76dd250]4820@@ -17,7 +17,7 @@
4821 int eval_to_bool __ARGS((char_u *arg, int *error, char_u **nextcmd, int skip));
4822 char_u *eval_to_string_skip __ARGS((char_u *arg, char_u **nextcmd, int skip));
4823 int skip_expr __ARGS((char_u **pp));
4824-char_u *eval_to_string __ARGS((char_u *arg, char_u **nextcmd, int dolist));
4825+char_u *eval_to_string __ARGS((char_u *arg, char_u **nextcmd, int convert));
4826 char_u *eval_to_string_safe __ARGS((char_u *arg, char_u **nextcmd, int use_sandbox));
4827 int eval_to_number __ARGS((char_u *expr));
4828 list_T *eval_spell_expr __ARGS((char_u *badword, char_u *expr));
4829@@ -46,7 +46,9 @@
4830 void list_unref __ARGS((list_T *l));
4831 void list_free __ARGS((list_T *l, int recurse));
4832 dictitem_T *dict_lookup __ARGS((hashitem_T *hi));
4833+char_u *list_find_str __ARGS((list_T *l, long idx));
4834 int list_append_dict __ARGS((list_T *list, dict_T *dict));
4835+int list_append_string __ARGS((list_T *l, char_u *str, int len));
4836 int garbage_collect __ARGS((void));
4837 dict_T *dict_alloc __ARGS((void));
4838 int dict_add_nr_str __ARGS((dict_T *d, char *key, long nr, char_u *str));
4839@@ -58,8 +60,10 @@
4840 void set_vim_var_nr __ARGS((int idx, long val));
4841 long get_vim_var_nr __ARGS((int idx));
4842 char_u *get_vim_var_str __ARGS((int idx));
4843-void set_vcount __ARGS((long count, long count1));
4844+list_T *get_vim_var_list __ARGS((int idx));
4845+void set_vcount __ARGS((long count, long count1, int set_prevcount));
4846 void set_vim_var_string __ARGS((int idx, char_u *val, int len));
4847+void set_vim_var_list __ARGS((int idx, list_T *val));
4848 void set_reg_var __ARGS((int c));
4849 char_u *v_exception __ARGS((char_u *oldval));
4850 char_u *v_throwpoint __ARGS((char_u *oldval));
4851@@ -94,6 +98,7 @@
4852 void write_viminfo_varlist __ARGS((FILE *fp));
4853 int store_session_globals __ARGS((FILE *fd));
4854 void last_set_msg __ARGS((scid_T scriptID));
4855+void ex_oldfiles __ARGS((exarg_T *eap));
4856 int modify_fname __ARGS((char_u *src, int *usedlen, char_u **fnamep, char_u **bufp, int *fnamelen));
4857 char_u *do_string_sub __ARGS((char_u *str, char_u *pat, char_u *sub, char_u *flags));
4858 /* vim: set ft=c : */
4859diff -Naur vim72.orig/src/proto/ex_cmds.pro vim72/src/proto/ex_cmds.pro
4860--- vim72.orig/src/proto/ex_cmds.pro 2008-08-09 07:31:25.000000000 -0700
[61a83e8]4861+++ vim72/src/proto/ex_cmds.pro 2009-02-15 23:26:29.540021232 -0800
[76dd250]4862@@ -11,7 +11,7 @@
4863 char_u *make_filter_cmd __ARGS((char_u *cmd, char_u *itmp, char_u *otmp));
4864 void append_redir __ARGS((char_u *buf, char_u *opt, char_u *fname));
4865 int viminfo_error __ARGS((char *errnum, char *message, char_u *line));
4866-int read_viminfo __ARGS((char_u *file, int want_info, int want_marks, int forceit));
4867+int read_viminfo __ARGS((char_u *file, int flags));
4868 void write_viminfo __ARGS((char_u *file, int forceit));
4869 int viminfo_readline __ARGS((vir_T *virp));
4870 char_u *viminfo_readstring __ARGS((vir_T *virp, int off, int convert));
4871diff -Naur vim72.orig/src/proto/ex_getln.pro vim72/src/proto/ex_getln.pro
4872--- vim72.orig/src/proto/ex_getln.pro 2008-08-09 07:31:28.000000000 -0700
[61a83e8]4873+++ vim72/src/proto/ex_getln.pro 2009-02-15 23:27:23.655489034 -0800
[76dd250]4874@@ -31,7 +31,7 @@
4875 void set_cmd_context __ARGS((expand_T *xp, char_u *str, int len, int col));
4876 int expand_cmdline __ARGS((expand_T *xp, char_u *str, int col, int *matchcount, char_u ***matches));
4877 int ExpandGeneric __ARGS((expand_T *xp, regmatch_T *regmatch, int *num_file, char_u ***file, char_u *((*func)(expand_T *, int))));
4878-char_u *globpath __ARGS((char_u *path, char_u *file));
4879+char_u *globpath __ARGS((char_u *path, char_u *file, int expand_options));
4880 void init_history __ARGS((void));
4881 int get_histtype __ARGS((char_u *name));
4882 void add_to_history __ARGS((int histype, char_u *new_entry, int in_map, int sep));
4883diff -Naur vim72.orig/src/proto/mark.pro vim72/src/proto/mark.pro
4884--- vim72.orig/src/proto/mark.pro 2008-08-09 07:31:36.000000000 -0700
[61a83e8]4885+++ vim72/src/proto/mark.pro 2009-02-15 23:26:29.540021232 -0800
[76dd250]4886@@ -26,5 +26,5 @@
4887 void write_viminfo_filemarks __ARGS((FILE *fp));
4888 int removable __ARGS((char_u *name));
4889 int write_viminfo_marks __ARGS((FILE *fp_out));
4890-void copy_viminfo_marks __ARGS((vir_T *virp, FILE *fp_out, int count, int eof));
4891+void copy_viminfo_marks __ARGS((vir_T *virp, FILE *fp_out, int count, int eof, int flags));
4892 /* vim: set ft=c : */
[1f22c7c]4893diff -Naur vim72.orig/src/proto/misc2.pro vim72/src/proto/misc2.pro
4894--- vim72.orig/src/proto/misc2.pro 2008-08-09 07:31:40.000000000 -0700
[61a83e8]4895+++ vim72/src/proto/misc2.pro 2009-02-15 23:28:32.423895795 -0800
[1f22c7c]4896@@ -59,7 +59,7 @@
4897 int handle_x_keys __ARGS((int key));
4898 char_u *get_special_key_name __ARGS((int c, int modifiers));
4899 int trans_special __ARGS((char_u **srcp, char_u *dst, int keycode));
4900-int find_special_key __ARGS((char_u **srcp, int *modp, int keycode));
4901+int find_special_key __ARGS((char_u **srcp, int *modp, int keycode, int keep_x_key));
4902 int extract_modifiers __ARGS((int key, int *modp));
4903 int find_special_key_in_table __ARGS((int c));
4904 int get_special_key_code __ARGS((char_u *name));
[43c52a1]4905diff -Naur vim72.orig/src/proto/netbeans.pro vim72/src/proto/netbeans.pro
4906--- vim72.orig/src/proto/netbeans.pro 2008-08-09 07:31:56.000000000 -0700
[61a83e8]4907+++ vim72/src/proto/netbeans.pro 2009-02-15 23:28:48.048896773 -0800
[43c52a1]4908@@ -11,7 +11,7 @@
4909 void netbeans_frame_moved __ARGS((int new_x, int new_y));
4910 void netbeans_file_activated __ARGS((buf_T *bufp));
4911 void netbeans_file_opened __ARGS((buf_T *bufp));
4912-void netbeans_file_closed __ARGS((buf_T *bufp));
4913+void netbeans_file_killed __ARGS((buf_T *bufp));
4914 void netbeans_inserted __ARGS((buf_T *bufp, linenr_T linenr, colnr_T col, char_u *txt, int newlen));
4915 void netbeans_removed __ARGS((buf_T *bufp, linenr_T linenr, colnr_T col, long len));
4916 void netbeans_unmodified __ARGS((buf_T *bufp));
[76dd250]4917diff -Naur vim72.orig/src/pty.c vim72/src/pty.c
4918--- vim72.orig/src/pty.c 2008-06-21 11:52:58.000000000 -0700
[61a83e8]4919+++ vim72/src/pty.c 2009-02-15 23:24:57.546124598 -0800
[76dd250]4920@@ -270,9 +270,10 @@
4921 }
4922 #endif
4923
4924-#if defined(HAVE_SVR4_PTYS) && !defined(PTY_DONE) && !defined(hpux)
4925+#if defined(HAVE_SVR4_PTYS) && !defined(PTY_DONE) && !defined(hpux) && !defined(MACOS_X)
4926
4927-/* NOTE: Even though HPUX can have /dev/ptmx, the code below doesn't work! */
4928+/* NOTE: Even though HPUX can have /dev/ptmx, the code below doesn't work!
4929+ * Same for Mac OS X Leopard. */
4930 #define PTY_DONE
4931 int
4932 OpenPTY(ttyn)
4933diff -Naur vim72.orig/src/screen.c vim72/src/screen.c
4934--- vim72.orig/src/screen.c 2008-07-24 07:45:07.000000000 -0700
[61a83e8]4935+++ vim72/src/screen.c 2009-02-15 23:26:05.654490571 -0800
[76dd250]4936@@ -2439,9 +2439,17 @@
4937
4938 #ifdef FEAT_SYN_HL
4939 /* Show 'cursorcolumn' in the fold line. */
4940- if (wp->w_p_cuc && (int)wp->w_virtcol + txtcol < W_WIDTH(wp))
4941- ScreenAttrs[off + wp->w_virtcol + txtcol] = hl_combine_attr(
4942- ScreenAttrs[off + wp->w_virtcol + txtcol], hl_attr(HLF_CUC));
4943+ if (wp->w_p_cuc)
4944+ {
4945+ txtcol += wp->w_virtcol;
4946+ if (wp->w_p_wrap)
4947+ txtcol -= wp->w_skipcol;
4948+ else
4949+ txtcol -= wp->w_leftcol;
4950+ if (txtcol >= 0 && txtcol < W_WIDTH(wp))
4951+ ScreenAttrs[off + txtcol] = hl_combine_attr(
4952+ ScreenAttrs[off + txtcol], hl_attr(HLF_CUC));
4953+ }
4954 #endif
4955
4956 SCREEN_LINE(row + W_WINROW(wp), W_WINCOL(wp), (int)W_WIDTH(wp),
4957diff -Naur vim72.orig/src/spell.c vim72/src/spell.c
4958--- vim72.orig/src/spell.c 2008-07-12 12:20:55.000000000 -0700
[61a83e8]4959+++ vim72/src/spell.c 2009-02-15 23:30:03.705744656 -0800
[76dd250]4960@@ -77,7 +77,7 @@
4961
4962 /*
4963 * Do the opposite: based on a maximum end score and a known sound score,
4964- * compute the the maximum word score that can be used.
4965+ * compute the maximum word score that can be used.
4966 */
4967 #define MAXSCORE(word_score, sound_score) ((4 * word_score - sound_score) / 3)
4968
4969@@ -469,6 +469,7 @@
4970 garray_T sl_comppat; /* CHECKCOMPOUNDPATTERN items */
4971 regprog_T *sl_compprog; /* COMPOUNDRULE turned into a regexp progrm
4972 * (NULL when no compounding) */
4973+ char_u *sl_comprules; /* all COMPOUNDRULE concatenated (or NULL) */
4974 char_u *sl_compstartflags; /* flags for first compound word */
4975 char_u *sl_compallflags; /* all flags for compound words */
4976 char_u sl_nobreak; /* When TRUE: no spaces between words */
4977@@ -625,7 +626,7 @@
4978 /* TRUE if a word appears in the list of banned words. */
4979 #define WAS_BANNED(su, word) (!HASHITEM_EMPTY(hash_find(&su->su_banned, word)))
4980
4981-/* Number of suggestions kept when cleaning up. we need to keep more than
4982+/* Number of suggestions kept when cleaning up. We need to keep more than
4983 * what is displayed, because when rescore_suggestions() is called the score
4984 * may change and wrong suggestions may be removed later. */
4985 #define SUG_CLEAN_COUNT(su) ((su)->su_maxcount < 130 ? 150 : (su)->su_maxcount + 20)
4986@@ -839,7 +840,10 @@
4987 static void slang_clear __ARGS((slang_T *lp));
4988 static void slang_clear_sug __ARGS((slang_T *lp));
4989 static void find_word __ARGS((matchinf_T *mip, int mode));
4990+static int match_checkcompoundpattern __ARGS((char_u *ptr, int wlen, garray_T *gap));
4991 static int can_compound __ARGS((slang_T *slang, char_u *word, char_u *flags));
4992+static int can_be_compound __ARGS((trystate_T *sp, slang_T *slang, char_u *compflags, int flag));
4993+static int match_compoundrule __ARGS((slang_T *slang, char_u *compflags));
4994 static int valid_word_prefix __ARGS((int totprefcnt, int arridx, int flags, char_u *word, slang_T *slang, int cond_req));
4995 static void find_prefix __ARGS((matchinf_T *mip, int mode));
4996 static int fold_more __ARGS((matchinf_T *mip));
4997@@ -1519,6 +1523,11 @@
4998 ((unsigned)flags >> 24)))
4999 continue;
5000
5001+ /* If there is a match with a CHECKCOMPOUNDPATTERN rule
5002+ * discard the compound word. */
5003+ if (match_checkcompoundpattern(ptr, wlen, &slang->sl_comppat))
5004+ continue;
5005+
5006 if (mode == FIND_COMPOUND)
5007 {
5008 int capflags;
5009@@ -1577,6 +1586,11 @@
5010 if (!can_compound(slang, fword, mip->mi_compflags))
5011 continue;
5012 }
5013+ else if (slang->sl_comprules != NULL
5014+ && !match_compoundrule(slang, mip->mi_compflags))
5015+ /* The compound flags collected so far do not match any
5016+ * COMPOUNDRULE, discard the compounded word. */
5017+ continue;
5018 }
5019
5020 /* Check NEEDCOMPOUND: can't use word without compounding. */
5021@@ -1727,6 +1741,39 @@
5022 }
5023
5024 /*
5025+ * Return TRUE if there is a match between the word ptr[wlen] and
5026+ * CHECKCOMPOUNDPATTERN rules, assuming that we will concatenate with another
5027+ * word.
5028+ * A match means that the first part of CHECKCOMPOUNDPATTERN matches at the
5029+ * end of ptr[wlen] and the second part matches after it.
5030+ */
5031+ static int
5032+match_checkcompoundpattern(ptr, wlen, gap)
5033+ char_u *ptr;
5034+ int wlen;
5035+ garray_T *gap; /* &sl_comppat */
5036+{
5037+ int i;
5038+ char_u *p;
5039+ int len;
5040+
5041+ for (i = 0; i + 1 < gap->ga_len; i += 2)
5042+ {
5043+ p = ((char_u **)gap->ga_data)[i + 1];
5044+ if (STRNCMP(ptr + wlen, p, STRLEN(p)) == 0)
5045+ {
5046+ /* Second part matches at start of following compound word, now
5047+ * check if first part matches at end of previous word. */
5048+ p = ((char_u **)gap->ga_data)[i];
5049+ len = (int)STRLEN(p);
5050+ if (len <= wlen && STRNCMP(ptr + wlen - len, p, len) == 0)
5051+ return TRUE;
5052+ }
5053+ }
5054+ return FALSE;
5055+}
5056+
5057+/*
5058 * Return TRUE if "flags" is a valid sequence of compound flags and "word"
5059 * does not have too many syllables.
5060 */
5061@@ -1773,6 +1820,98 @@
5062 }
5063
5064 /*
5065+ * Return TRUE when the sequence of flags in "compflags" plus "flag" can
5066+ * possibly form a valid compounded word. This also checks the COMPOUNDRULE
5067+ * lines if they don't contain wildcards.
5068+ */
5069+ static int
5070+can_be_compound(sp, slang, compflags, flag)
5071+ trystate_T *sp;
5072+ slang_T *slang;
5073+ char_u *compflags;
5074+ int flag;
5075+{
5076+ /* If the flag doesn't appear in sl_compstartflags or sl_compallflags
5077+ * then it can't possibly compound. */
5078+ if (!byte_in_str(sp->ts_complen == sp->ts_compsplit
5079+ ? slang->sl_compstartflags : slang->sl_compallflags, flag))
5080+ return FALSE;
5081+
5082+ /* If there are no wildcards, we can check if the flags collected so far
5083+ * possibly can form a match with COMPOUNDRULE patterns. This only
5084+ * makes sense when we have two or more words. */
5085+ if (slang->sl_comprules != NULL && sp->ts_complen > sp->ts_compsplit)
5086+ {
5087+ int v;
5088+
5089+ compflags[sp->ts_complen] = flag;
5090+ compflags[sp->ts_complen + 1] = NUL;
5091+ v = match_compoundrule(slang, compflags + sp->ts_compsplit);
5092+ compflags[sp->ts_complen] = NUL;
5093+ return v;
5094+ }
5095+
5096+ return TRUE;
5097+}
5098+
5099+
5100+/*
5101+ * Return TRUE if the compound flags in compflags[] match the start of any
5102+ * compound rule. This is used to stop trying a compound if the flags
5103+ * collected so far can't possibly match any compound rule.
5104+ * Caller must check that slang->sl_comprules is not NULL.
5105+ */
5106+ static int
5107+match_compoundrule(slang, compflags)
5108+ slang_T *slang;
5109+ char_u *compflags;
5110+{
5111+ char_u *p;
5112+ int i;
5113+ int c;
5114+
5115+ /* loop over all the COMPOUNDRULE entries */
5116+ for (p = slang->sl_comprules; *p != NUL; ++p)
5117+ {
5118+ /* loop over the flags in the compound word we have made, match
5119+ * them against the current rule entry */
5120+ for (i = 0; ; ++i)
5121+ {
5122+ c = compflags[i];
5123+ if (c == NUL)
5124+ /* found a rule that matches for the flags we have so far */
5125+ return TRUE;
5126+ if (*p == '/' || *p == NUL)
5127+ break; /* end of rule, it's too short */
5128+ if (*p == '[')
5129+ {
5130+ int match = FALSE;
5131+
5132+ /* compare against all the flags in [] */
5133+ ++p;
5134+ while (*p != ']' && *p != NUL)
5135+ if (*p++ == c)
5136+ match = TRUE;
5137+ if (!match)
5138+ break; /* none matches */
5139+ }
5140+ else if (*p != c)
5141+ break; /* flag of word doesn't match flag in pattern */
5142+ ++p;
5143+ }
5144+
5145+ /* Skip to the next "/", where the next pattern starts. */
5146+ p = vim_strchr(p, '/');
5147+ if (p == NULL)
5148+ break;
5149+ }
5150+
5151+ /* Checked all the rules and none of them match the flags, so there
5152+ * can't possibly be a compound starting with these flags. */
5153+ return FALSE;
5154+}
5155+
5156+/*
5157 * Return non-zero if the prefix indicated by "arridx" matches with the prefix
5158 * ID in "flags" for the word "word".
5159 * The WF_RAREPFX flag is included in the return value for a rare prefix.
[61a83e8]5160@@ -2237,7 +2376,7 @@
5161
5162 /* If we are back at the starting line and there is no match then
5163 * give up. */
5164- if (lnum == wp->w_cursor.lnum && !found_one)
5165+ if (lnum == wp->w_cursor.lnum && (!found_one || wrapped))
5166 break;
5167
5168 /* Skip the characters at the start of the next line that were
[76dd250]5169@@ -2513,9 +2652,11 @@
5170 lp->sl_midword = NULL;
5171
5172 vim_free(lp->sl_compprog);
5173+ vim_free(lp->sl_comprules);
5174 vim_free(lp->sl_compstartflags);
5175 vim_free(lp->sl_compallflags);
5176 lp->sl_compprog = NULL;
5177+ lp->sl_comprules = NULL;
5178 lp->sl_compstartflags = NULL;
5179 lp->sl_compallflags = NULL;
5180
5181@@ -3460,6 +3601,7 @@
5182 char_u *pp;
5183 char_u *cp;
5184 char_u *ap;
5185+ char_u *crp;
5186 int cnt;
5187 garray_T *gap;
5188
5189@@ -3545,6 +3687,12 @@
5190 slang->sl_compallflags = ap;
5191 *ap = NUL;
5192
5193+ /* And a list of all patterns in their original form, for checking whether
5194+ * compounding may work in match_compoundrule(). This is freed when we
5195+ * encounter a wildcard, the check doesn't work then. */
5196+ crp = alloc(todo + 1);
5197+ slang->sl_comprules = crp;
5198+
5199 pp = pat;
5200 *pp++ = '^';
5201 *pp++ = '\\';
5202@@ -3587,6 +3735,20 @@
5203 atstart = 0;
5204 }
5205 }
5206+
5207+ /* Copy flag to "sl_comprules", unless we run into a wildcard. */
5208+ if (crp != NULL)
5209+ {
5210+ if (c == '+' || c == '*')
5211+ {
5212+ vim_free(slang->sl_comprules);
5213+ slang->sl_comprules = NULL;
5214+ crp = NULL;
5215+ }
5216+ else
5217+ *crp++ = c;
5218+ }
5219+
5220 if (c == '/') /* slash separates two items */
5221 {
5222 *pp++ = '\\';
5223@@ -3611,6 +3773,9 @@
5224 *pp++ = '$';
5225 *pp = NUL;
5226
5227+ if (crp != NULL)
5228+ *crp = NUL;
5229+
5230 slang->sl_compprog = vim_regcomp(pat, RE_MAGIC + RE_STRING + RE_STRICT);
5231 vim_free(pat);
5232 if (slang->sl_compprog == NULL)
[61a83e8]5233@@ -4791,13 +4956,16 @@
5234 * Structure that is used to store the items in the word tree. This avoids
5235 * the need to keep track of each allocated thing, everything is freed all at
5236 * once after ":mkspell" is done.
5237+ * Note: "sb_next" must be just before "sb_data" to make sure the alignment of
5238+ * "sb_data" is correct for systems where pointers must be aligned on
5239+ * pointer-size boundaries and sizeof(pointer) > sizeof(int) (e.g., Sparc).
5240 */
5241 #define SBLOCKSIZE 16000 /* size of sb_data */
5242 typedef struct sblock_S sblock_T;
5243 struct sblock_S
5244 {
5245- sblock_T *sb_next; /* next block in list */
5246 int sb_used; /* nr of bytes already in use */
5247+ sblock_T *sb_next; /* next block in list */
5248 char_u sb_data[1]; /* data, actually longer */
5249 };
5250
5251@@ -4915,6 +5083,7 @@
[76dd250]5252 } spellinfo_T;
5253
5254 static afffile_T *spell_read_aff __ARGS((spellinfo_T *spin, char_u *fname));
5255+static int is_aff_rule __ARGS((char_u **items, int itemcnt, char *rulename, int mincount));
5256 static void aff_process_flags __ARGS((afffile_T *affile, affentry_T *entry));
5257 static int spell_info_item __ARGS((char_u *s));
5258 static unsigned affitem2flag __ARGS((int flagtype, char_u *item, char_u *fname, int lnum));
[61a83e8]5259@@ -4950,7 +5119,7 @@
[76dd250]5260 static void put_sugtime __ARGS((spellinfo_T *spin, FILE *fd));
5261 static int write_vim_spell __ARGS((spellinfo_T *spin, char_u *fname));
5262 static void clear_node __ARGS((wordnode_T *node));
5263-static int put_node __ARGS((FILE *fd, wordnode_T *node, int index, int regionmask, int prefixtree));
5264+static int put_node __ARGS((FILE *fd, wordnode_T *node, int idx, int regionmask, int prefixtree));
5265 static void spell_make_sugfile __ARGS((spellinfo_T *spin, char_u *wfname));
5266 static int sug_filltree __ARGS((spellinfo_T *spin, slang_T *slang));
5267 static int sug_maketable __ARGS((spellinfo_T *spin));
[61a83e8]5268@@ -5223,8 +5392,7 @@
[76dd250]5269 /* Handle non-empty lines. */
5270 if (itemcnt > 0)
5271 {
5272- if (STRCMP(items[0], "SET") == 0 && itemcnt == 2
5273- && aff->af_enc == NULL)
5274+ if (is_aff_rule(items, itemcnt, "SET", 2) && aff->af_enc == NULL)
5275 {
5276 #ifdef FEAT_MBYTE
5277 /* Setup for conversion from "ENC" to 'encoding'. */
[61a83e8]5278@@ -5239,7 +5407,7 @@
[76dd250]5279 smsg((char_u *)_("Conversion in %s not supported"), fname);
5280 #endif
5281 }
5282- else if (STRCMP(items[0], "FLAG") == 0 && itemcnt == 2
5283+ else if (is_aff_rule(items, itemcnt, "FLAG", 2)
5284 && aff->af_flagtype == AFT_CHAR)
5285 {
5286 if (STRCMP(items[1], "long") == 0)
[61a83e8]5287@@ -5284,69 +5452,71 @@
[76dd250]5288 spin->si_info = p;
5289 }
5290 }
5291- else if (STRCMP(items[0], "MIDWORD") == 0 && itemcnt == 2
5292+ else if (is_aff_rule(items, itemcnt, "MIDWORD", 2)
5293 && midword == NULL)
5294 {
5295 midword = getroom_save(spin, items[1]);
5296 }
5297- else if (STRCMP(items[0], "TRY") == 0 && itemcnt == 2)
5298+ else if (is_aff_rule(items, itemcnt, "TRY", 2))
5299 {
5300 /* ignored, we look in the tree for what chars may appear */
5301 }
5302 /* TODO: remove "RAR" later */
5303- else if ((STRCMP(items[0], "RAR") == 0
5304- || STRCMP(items[0], "RARE") == 0) && itemcnt == 2
5305- && aff->af_rare == 0)
5306+ else if ((is_aff_rule(items, itemcnt, "RAR", 2)
5307+ || is_aff_rule(items, itemcnt, "RARE", 2))
5308+ && aff->af_rare == 0)
5309 {
5310 aff->af_rare = affitem2flag(aff->af_flagtype, items[1],
5311 fname, lnum);
5312 }
5313 /* TODO: remove "KEP" later */
5314- else if ((STRCMP(items[0], "KEP") == 0
5315- || STRCMP(items[0], "KEEPCASE") == 0) && itemcnt == 2
5316+ else if ((is_aff_rule(items, itemcnt, "KEP", 2)
5317+ || is_aff_rule(items, itemcnt, "KEEPCASE", 2))
5318 && aff->af_keepcase == 0)
5319 {
5320 aff->af_keepcase = affitem2flag(aff->af_flagtype, items[1],
5321 fname, lnum);
5322 }
5323- else if (STRCMP(items[0], "BAD") == 0 && itemcnt == 2
5324- && aff->af_bad == 0)
5325+ else if ((is_aff_rule(items, itemcnt, "BAD", 2)
5326+ || is_aff_rule(items, itemcnt, "FORBIDDENWORD", 2))
5327+ && aff->af_bad == 0)
5328 {
5329 aff->af_bad = affitem2flag(aff->af_flagtype, items[1],
5330 fname, lnum);
5331 }
5332- else if (STRCMP(items[0], "NEEDAFFIX") == 0 && itemcnt == 2
5333+ else if (is_aff_rule(items, itemcnt, "NEEDAFFIX", 2)
5334 && aff->af_needaffix == 0)
5335 {
5336 aff->af_needaffix = affitem2flag(aff->af_flagtype, items[1],
5337 fname, lnum);
5338 }
5339- else if (STRCMP(items[0], "CIRCUMFIX") == 0 && itemcnt == 2
5340+ else if (is_aff_rule(items, itemcnt, "CIRCUMFIX", 2)
5341 && aff->af_circumfix == 0)
5342 {
5343 aff->af_circumfix = affitem2flag(aff->af_flagtype, items[1],
5344 fname, lnum);
5345 }
5346- else if (STRCMP(items[0], "NOSUGGEST") == 0 && itemcnt == 2
5347+ else if (is_aff_rule(items, itemcnt, "NOSUGGEST", 2)
5348 && aff->af_nosuggest == 0)
5349 {
5350 aff->af_nosuggest = affitem2flag(aff->af_flagtype, items[1],
5351 fname, lnum);
5352 }
5353- else if (STRCMP(items[0], "NEEDCOMPOUND") == 0 && itemcnt == 2
5354+ else if ((is_aff_rule(items, itemcnt, "NEEDCOMPOUND", 2)
5355+ || is_aff_rule(items, itemcnt, "ONLYINCOMPOUND", 2))
5356 && aff->af_needcomp == 0)
5357 {
5358 aff->af_needcomp = affitem2flag(aff->af_flagtype, items[1],
5359 fname, lnum);
5360 }
5361- else if (STRCMP(items[0], "COMPOUNDROOT") == 0 && itemcnt == 2
5362+ else if (is_aff_rule(items, itemcnt, "COMPOUNDROOT", 2)
5363 && aff->af_comproot == 0)
5364 {
5365 aff->af_comproot = affitem2flag(aff->af_flagtype, items[1],
5366 fname, lnum);
5367 }
5368- else if (STRCMP(items[0], "COMPOUNDFORBIDFLAG") == 0
5369- && itemcnt == 2 && aff->af_compforbid == 0)
5370+ else if (is_aff_rule(items, itemcnt, "COMPOUNDFORBIDFLAG", 2)
5371+ && aff->af_compforbid == 0)
5372 {
5373 aff->af_compforbid = affitem2flag(aff->af_flagtype, items[1],
5374 fname, lnum);
[61a83e8]5375@@ -5354,8 +5524,8 @@
[76dd250]5376 smsg((char_u *)_("Defining COMPOUNDFORBIDFLAG after PFX item may give wrong results in %s line %d"),
5377 fname, lnum);
5378 }
5379- else if (STRCMP(items[0], "COMPOUNDPERMITFLAG") == 0
5380- && itemcnt == 2 && aff->af_comppermit == 0)
5381+ else if (is_aff_rule(items, itemcnt, "COMPOUNDPERMITFLAG", 2)
5382+ && aff->af_comppermit == 0)
5383 {
5384 aff->af_comppermit = affitem2flag(aff->af_flagtype, items[1],
5385 fname, lnum);
[61a83e8]5386@@ -5363,7 +5533,7 @@
[76dd250]5387 smsg((char_u *)_("Defining COMPOUNDPERMITFLAG after PFX item may give wrong results in %s line %d"),
5388 fname, lnum);
5389 }
5390- else if (STRCMP(items[0], "COMPOUNDFLAG") == 0 && itemcnt == 2
5391+ else if (is_aff_rule(items, itemcnt, "COMPOUNDFLAG", 2)
5392 && compflags == NULL)
5393 {
5394 /* Turn flag "c" into COMPOUNDRULE compatible string "c+",
[61a83e8]5395@@ -5376,7 +5546,15 @@
[76dd250]5396 compflags = p;
5397 }
5398 }
5399- else if (STRCMP(items[0], "COMPOUNDRULE") == 0 && itemcnt == 2)
5400+ else if (is_aff_rule(items, itemcnt, "COMPOUNDRULES", 2))
5401+ {
5402+ /* We don't use the count, but do check that it's a number and
5403+ * not COMPOUNDRULE mistyped. */
5404+ if (atoi((char *)items[1]) == 0)
5405+ smsg((char_u *)_("Wrong COMPOUNDRULES value in %s line %d: %s"),
5406+ fname, lnum, items[1]);
5407+ }
5408+ else if (is_aff_rule(items, itemcnt, "COMPOUNDRULE", 2))
5409 {
5410 /* Concatenate this string to previously defined ones, using a
5411 * slash to separate them. */
[61a83e8]5412@@ -5395,7 +5573,7 @@
[76dd250]5413 compflags = p;
5414 }
5415 }
5416- else if (STRCMP(items[0], "COMPOUNDWORDMAX") == 0 && itemcnt == 2
5417+ else if (is_aff_rule(items, itemcnt, "COMPOUNDWORDMAX", 2)
5418 && compmax == 0)
5419 {
5420 compmax = atoi((char *)items[1]);
[61a83e8]5421@@ -5403,7 +5581,7 @@
[76dd250]5422 smsg((char_u *)_("Wrong COMPOUNDWORDMAX value in %s line %d: %s"),
5423 fname, lnum, items[1]);
5424 }
5425- else if (STRCMP(items[0], "COMPOUNDMIN") == 0 && itemcnt == 2
5426+ else if (is_aff_rule(items, itemcnt, "COMPOUNDMIN", 2)
5427 && compminlen == 0)
5428 {
5429 compminlen = atoi((char *)items[1]);
[61a83e8]5430@@ -5411,7 +5589,7 @@
[76dd250]5431 smsg((char_u *)_("Wrong COMPOUNDMIN value in %s line %d: %s"),
5432 fname, lnum, items[1]);
5433 }
5434- else if (STRCMP(items[0], "COMPOUNDSYLMAX") == 0 && itemcnt == 2
5435+ else if (is_aff_rule(items, itemcnt, "COMPOUNDSYLMAX", 2)
5436 && compsylmax == 0)
5437 {
5438 compsylmax = atoi((char *)items[1]);
[61a83e8]5439@@ -5419,32 +5597,29 @@
[76dd250]5440 smsg((char_u *)_("Wrong COMPOUNDSYLMAX value in %s line %d: %s"),
5441 fname, lnum, items[1]);
5442 }
5443- else if (STRCMP(items[0], "CHECKCOMPOUNDDUP") == 0 && itemcnt == 1)
5444+ else if (is_aff_rule(items, itemcnt, "CHECKCOMPOUNDDUP", 1))
5445 {
5446 compoptions |= COMP_CHECKDUP;
5447 }
5448- else if (STRCMP(items[0], "CHECKCOMPOUNDREP") == 0 && itemcnt == 1)
5449+ else if (is_aff_rule(items, itemcnt, "CHECKCOMPOUNDREP", 1))
5450 {
5451 compoptions |= COMP_CHECKREP;
5452 }
5453- else if (STRCMP(items[0], "CHECKCOMPOUNDCASE") == 0 && itemcnt == 1)
5454+ else if (is_aff_rule(items, itemcnt, "CHECKCOMPOUNDCASE", 1))
5455 {
5456 compoptions |= COMP_CHECKCASE;
5457 }
5458- else if (STRCMP(items[0], "CHECKCOMPOUNDTRIPLE") == 0
5459- && itemcnt == 1)
5460+ else if (is_aff_rule(items, itemcnt, "CHECKCOMPOUNDTRIPLE", 1))
5461 {
5462 compoptions |= COMP_CHECKTRIPLE;
5463 }
5464- else if (STRCMP(items[0], "CHECKCOMPOUNDPATTERN") == 0
5465- && itemcnt == 2)
5466+ else if (is_aff_rule(items, itemcnt, "CHECKCOMPOUNDPATTERN", 2))
5467 {
5468 if (atoi((char *)items[1]) == 0)
5469 smsg((char_u *)_("Wrong CHECKCOMPOUNDPATTERN value in %s line %d: %s"),
5470 fname, lnum, items[1]);
5471 }
5472- else if (STRCMP(items[0], "CHECKCOMPOUNDPATTERN") == 0
5473- && itemcnt == 3)
5474+ else if (is_aff_rule(items, itemcnt, "CHECKCOMPOUNDPATTERN", 3))
5475 {
5476 garray_T *gap = &spin->si_comppat;
5477 int i;
[61a83e8]5478@@ -5463,24 +5638,24 @@
[76dd250]5479 = getroom_save(spin, items[2]);
5480 }
5481 }
5482- else if (STRCMP(items[0], "SYLLABLE") == 0 && itemcnt == 2
5483+ else if (is_aff_rule(items, itemcnt, "SYLLABLE", 2)
5484 && syllable == NULL)
5485 {
5486 syllable = getroom_save(spin, items[1]);
5487 }
5488- else if (STRCMP(items[0], "NOBREAK") == 0 && itemcnt == 1)
5489+ else if (is_aff_rule(items, itemcnt, "NOBREAK", 1))
5490 {
5491 spin->si_nobreak = TRUE;
5492 }
5493- else if (STRCMP(items[0], "NOSPLITSUGS") == 0 && itemcnt == 1)
5494+ else if (is_aff_rule(items, itemcnt, "NOSPLITSUGS", 1))
5495 {
5496 spin->si_nosplitsugs = TRUE;
5497 }
5498- else if (STRCMP(items[0], "NOSUGFILE") == 0 && itemcnt == 1)
5499+ else if (is_aff_rule(items, itemcnt, "NOSUGFILE", 1))
5500 {
5501 spin->si_nosugfile = TRUE;
5502 }
5503- else if (STRCMP(items[0], "PFXPOSTPONE") == 0 && itemcnt == 1)
5504+ else if (is_aff_rule(items, itemcnt, "PFXPOSTPONE", 1))
5505 {
5506 aff->af_pfxpostpone = TRUE;
5507 }
[61a83e8]5508@@ -5771,24 +5946,20 @@
[76dd250]5509 }
5510 }
5511 }
5512- else if (STRCMP(items[0], "FOL") == 0 && itemcnt == 2
5513- && fol == NULL)
5514+ else if (is_aff_rule(items, itemcnt, "FOL", 2) && fol == NULL)
5515 {
5516 fol = vim_strsave(items[1]);
5517 }
5518- else if (STRCMP(items[0], "LOW") == 0 && itemcnt == 2
5519- && low == NULL)
5520+ else if (is_aff_rule(items, itemcnt, "LOW", 2) && low == NULL)
5521 {
5522 low = vim_strsave(items[1]);
5523 }
5524- else if (STRCMP(items[0], "UPP") == 0 && itemcnt == 2
5525- && upp == NULL)
5526+ else if (is_aff_rule(items, itemcnt, "UPP", 2) && upp == NULL)
5527 {
5528 upp = vim_strsave(items[1]);
5529 }
5530- else if ((STRCMP(items[0], "REP") == 0
5531- || STRCMP(items[0], "REPSAL") == 0)
5532- && itemcnt == 2)
5533+ else if (is_aff_rule(items, itemcnt, "REP", 2)
5534+ || is_aff_rule(items, itemcnt, "REPSAL", 2))
5535 {
5536 /* Ignore REP/REPSAL count */;
5537 if (!isdigit(*items[1]))
[61a83e8]5538@@ -5819,7 +5990,7 @@
[76dd250]5539 : &spin->si_rep, items[1], items[2]);
5540 }
5541 }
5542- else if (STRCMP(items[0], "MAP") == 0 && itemcnt == 2)
5543+ else if (is_aff_rule(items, itemcnt, "MAP", 2))
5544 {
5545 /* MAP item or count */
5546 if (!found_map)
[61a83e8]5547@@ -5856,9 +6027,8 @@
[76dd250]5548 ga_append(&spin->si_map, '/');
5549 }
5550 }
5551- /* Accept "SAL from to" and "SAL from to # comment". */
5552- else if (STRCMP(items[0], "SAL") == 0
5553- && (itemcnt == 3 || (itemcnt > 3 && items[3][0] == '#')))
5554+ /* Accept "SAL from to" and "SAL from to #comment". */
5555+ else if (is_aff_rule(items, itemcnt, "SAL", 3))
5556 {
5557 if (do_sal)
5558 {
[61a83e8]5559@@ -5877,12 +6047,12 @@
[76dd250]5560 : items[2]);
5561 }
5562 }
5563- else if (STRCMP(items[0], "SOFOFROM") == 0 && itemcnt == 2
5564+ else if (is_aff_rule(items, itemcnt, "SOFOFROM", 2)
5565 && sofofrom == NULL)
5566 {
5567 sofofrom = getroom_save(spin, items[1]);
5568 }
5569- else if (STRCMP(items[0], "SOFOTO") == 0 && itemcnt == 2
5570+ else if (is_aff_rule(items, itemcnt, "SOFOTO", 2)
5571 && sofoto == NULL)
5572 {
5573 sofoto = getroom_save(spin, items[1]);
[61a83e8]5574@@ -5980,7 +6150,7 @@
[76dd250]5575 else if (spin->si_newprefID == 0 || spin->si_newprefID == 127)
5576 MSG(_("Too many compound flags"));
5577 else
5578- MSG(_("Too many posponed prefixes and/or compound flags"));
5579+ MSG(_("Too many postponed prefixes and/or compound flags"));
5580 }
5581
5582 if (syllable != NULL)
[61a83e8]5583@@ -6017,6 +6187,22 @@
[76dd250]5584 }
5585
5586 /*
5587+ * Return TRUE when items[0] equals "rulename", there are "mincount" items or
5588+ * a comment is following after item "mincount".
5589+ */
5590+ static int
5591+is_aff_rule(items, itemcnt, rulename, mincount)
5592+ char_u **items;
5593+ int itemcnt;
5594+ char *rulename;
5595+ int mincount;
5596+{
5597+ return (STRCMP(items[0], rulename) == 0
5598+ && (itemcnt == mincount
5599+ || (itemcnt > mincount && items[mincount][0] == '#')));
5600+}
5601+
5602+/*
5603 * For affix "entry" move COMPOUNDFORBIDFLAG and COMPOUNDPERMITFLAG from
5604 * ae_flags to ae_comppermit and ae_compforbid.
5605 */
[61a83e8]5606@@ -7926,6 +8112,8 @@
[76dd250]5607 char_u *p;
5608 int rr;
5609 int retval = OK;
5610+ size_t fwv = 1; /* collect return value of fwrite() to avoid
5611+ warnings from picky compiler */
5612
5613 fd = mch_fopen((char *)fname, "w");
5614 if (fd == NULL)
[61a83e8]5615@@ -7936,11 +8124,11 @@
[76dd250]5616
5617 /* <HEADER>: <fileID> <versionnr> */
5618 /* <fileID> */
5619- if (fwrite(VIMSPELLMAGIC, VIMSPELLMAGICL, (size_t)1, fd) != 1)
5620- {
5621- EMSG(_(e_write));
5622- retval = FAIL;
5623- }
5624+ fwv &= fwrite(VIMSPELLMAGIC, VIMSPELLMAGICL, (size_t)1, fd);
5625+ if (fwv != (size_t)1)
5626+ /* Catch first write error, don't try writing more. */
5627+ goto theend;
5628+
5629 putc(VIMSPELLVERSION, fd); /* <versionnr> */
5630
5631 /*
[61a83e8]5632@@ -7955,7 +8143,7 @@
[76dd250]5633
5634 i = (int)STRLEN(spin->si_info);
5635 put_bytes(fd, (long_u)i, 4); /* <sectionlen> */
5636- fwrite(spin->si_info, (size_t)i, (size_t)1, fd); /* <infotext> */
5637+ fwv &= fwrite(spin->si_info, (size_t)i, (size_t)1, fd); /* <infotext> */
5638 }
5639
5640 /* SN_REGION: <regionname> ...
[61a83e8]5641@@ -7966,7 +8154,7 @@
[76dd250]5642 putc(SNF_REQUIRED, fd); /* <sectionflags> */
5643 l = spin->si_region_count * 2;
5644 put_bytes(fd, (long_u)l, 4); /* <sectionlen> */
5645- fwrite(spin->si_region_name, (size_t)l, (size_t)1, fd);
5646+ fwv &= fwrite(spin->si_region_name, (size_t)l, (size_t)1, fd);
5647 /* <regionname> ... */
5648 regionmask = (1 << spin->si_region_count) - 1;
5649 }
[61a83e8]5650@@ -8016,7 +8204,7 @@
[76dd250]5651 }
5652
5653 put_bytes(fd, (long_u)l, 2); /* <folcharslen> */
5654- fwrite(folchars, (size_t)l, (size_t)1, fd); /* <folchars> */
5655+ fwv &= fwrite(folchars, (size_t)l, (size_t)1, fd); /* <folchars> */
5656 }
5657
5658 /* SN_MIDWORD: <midword> */
[61a83e8]5659@@ -8027,7 +8215,8 @@
[76dd250]5660
5661 i = (int)STRLEN(spin->si_midword);
5662 put_bytes(fd, (long_u)i, 4); /* <sectionlen> */
5663- fwrite(spin->si_midword, (size_t)i, (size_t)1, fd); /* <midword> */
5664+ fwv &= fwrite(spin->si_midword, (size_t)i, (size_t)1, fd);
5665+ /* <midword> */
5666 }
5667
5668 /* SN_PREFCOND: <prefcondcnt> <prefcond> ... */
[61a83e8]5669@@ -8113,7 +8302,8 @@
[76dd250]5670 p = rr == 1 ? ftp->ft_from : ftp->ft_to;
5671 l = (int)STRLEN(p);
5672 putc(l, fd);
5673- fwrite(p, l, (size_t)1, fd);
5674+ if (l > 0)
5675+ fwv &= fwrite(p, l, (size_t)1, fd);
5676 }
5677 }
5678
[61a83e8]5679@@ -8131,11 +8321,11 @@
[76dd250]5680 /* <sectionlen> */
5681
5682 put_bytes(fd, (long_u)l, 2); /* <sofofromlen> */
5683- fwrite(spin->si_sofofr, l, (size_t)1, fd); /* <sofofrom> */
5684+ fwv &= fwrite(spin->si_sofofr, l, (size_t)1, fd); /* <sofofrom> */
5685
5686 l = (int)STRLEN(spin->si_sofoto);
5687 put_bytes(fd, (long_u)l, 2); /* <sofotolen> */
5688- fwrite(spin->si_sofoto, l, (size_t)1, fd); /* <sofoto> */
5689+ fwv &= fwrite(spin->si_sofoto, l, (size_t)1, fd); /* <sofoto> */
5690 }
5691
5692 /* SN_WORDS: <word> ...
[61a83e8]5693@@ -8160,7 +8350,7 @@
[76dd250]5694 l = (int)STRLEN(hi->hi_key) + 1;
5695 len += l;
5696 if (round == 2) /* <word> */
5697- fwrite(hi->hi_key, (size_t)l, (size_t)1, fd);
5698+ fwv &= fwrite(hi->hi_key, (size_t)l, (size_t)1, fd);
5699 --todo;
5700 }
5701 if (round == 1)
[61a83e8]5702@@ -8176,7 +8366,7 @@
[76dd250]5703 putc(0, fd); /* <sectionflags> */
5704 l = spin->si_map.ga_len;
5705 put_bytes(fd, (long_u)l, 4); /* <sectionlen> */
5706- fwrite(spin->si_map.ga_data, (size_t)l, (size_t)1, fd);
5707+ fwv &= fwrite(spin->si_map.ga_data, (size_t)l, (size_t)1, fd);
5708 /* <mapstr> */
5709 }
5710
[61a83e8]5711@@ -8232,10 +8422,11 @@
[76dd250]5712 {
5713 p = ((char_u **)(spin->si_comppat.ga_data))[i];
5714 putc((int)STRLEN(p), fd); /* <comppatlen> */
5715- fwrite(p, (size_t)STRLEN(p), (size_t)1, fd);/* <comppattext> */
5716+ fwv &= fwrite(p, (size_t)STRLEN(p), (size_t)1, fd);
5717+ /* <comppattext> */
5718 }
5719 /* <compflags> */
5720- fwrite(spin->si_compflags, (size_t)STRLEN(spin->si_compflags),
5721+ fwv &= fwrite(spin->si_compflags, (size_t)STRLEN(spin->si_compflags),
5722 (size_t)1, fd);
5723 }
5724
[61a83e8]5725@@ -8259,7 +8450,8 @@
[76dd250]5726
5727 l = (int)STRLEN(spin->si_syllable);
5728 put_bytes(fd, (long_u)l, 4); /* <sectionlen> */
5729- fwrite(spin->si_syllable, (size_t)l, (size_t)1, fd); /* <syllable> */
5730+ fwv &= fwrite(spin->si_syllable, (size_t)l, (size_t)1, fd);
5731+ /* <syllable> */
5732 }
5733
5734 /* end of <SECTIONS> */
[61a83e8]5735@@ -8295,13 +8487,18 @@
[76dd250]5736 (void)put_node(fd, tree, 0, regionmask, round == 3);
5737 }
5738
5739- /* Write another byte to check for errors. */
5740+ /* Write another byte to check for errors (file system full). */
5741 if (putc(0, fd) == EOF)
5742 retval = FAIL;
5743-
5744+theend:
5745 if (fclose(fd) == EOF)
5746 retval = FAIL;
5747
5748+ if (fwv != (size_t)1)
5749+ retval = FAIL;
5750+ if (retval == FAIL)
5751+ EMSG(_(e_write));
5752+
5753 return retval;
5754 }
5755
[61a83e8]5756@@ -9890,6 +10087,7 @@
[76dd250]5757 char_u *p;
5758 int len;
5759 int totlen;
5760+ size_t x = 1; /* collect return value of fwrite() */
5761
5762 if (fd != NULL)
5763 put_bytes(fd, (long_u)gap->ga_len, 2); /* <prefcondcnt> */
[61a83e8]5764@@ -9906,7 +10104,7 @@
[76dd250]5765 if (fd != NULL)
5766 {
5767 fputc(len, fd);
5768- fwrite(p, (size_t)len, (size_t)1, fd);
5769+ x &= fwrite(p, (size_t)len, (size_t)1, fd);
5770 }
5771 totlen += len;
5772 }
[61a83e8]5773@@ -11480,15 +11678,24 @@
[76dd250]5774 vim_strncpy(preword + sp->ts_prewordlen,
5775 tword + sp->ts_splitoff,
5776 sp->ts_twordlen - sp->ts_splitoff);
5777- p = preword;
5778- while (*skiptowhite(p) != NUL)
5779- p = skipwhite(skiptowhite(p));
5780- if (fword_ends && !can_compound(slang, p,
5781- compflags + sp->ts_compsplit))
5782- /* Compound is not allowed. But it may still be
5783- * possible if we add another (short) word. */
5784+
5785+ /* Verify CHECKCOMPOUNDPATTERN rules. */
5786+ if (match_checkcompoundpattern(preword, sp->ts_prewordlen,
5787+ &slang->sl_comppat))
5788 compound_ok = FALSE;
5789
5790+ if (compound_ok)
5791+ {
5792+ p = preword;
5793+ while (*skiptowhite(p) != NUL)
5794+ p = skipwhite(skiptowhite(p));
5795+ if (fword_ends && !can_compound(slang, p,
5796+ compflags + sp->ts_compsplit))
5797+ /* Compound is not allowed. But it may still be
5798+ * possible if we add another (short) word. */
5799+ compound_ok = FALSE;
5800+ }
5801+
5802 /* Get pointer to last char of previous word. */
5803 p = preword + sp->ts_prewordlen;
5804 mb_ptr_back(preword, p);
[61a83e8]5805@@ -11685,10 +11892,9 @@
[76dd250]5806 && (slang->sl_compsylmax < MAXWLEN
5807 || sp->ts_complen + 1 - sp->ts_compsplit
5808 < slang->sl_compmax)
5809- && (byte_in_str(sp->ts_complen == sp->ts_compsplit
5810- ? slang->sl_compstartflags
5811- : slang->sl_compallflags,
5812- ((unsigned)flags >> 24))))
5813+ && (can_be_compound(sp, slang,
5814+ compflags, ((unsigned)flags >> 24))))
5815+
5816 {
5817 try_compound = TRUE;
5818 compflags[sp->ts_complen] = ((unsigned)flags >> 24);
[61a83e8]5819@@ -14808,7 +15014,7 @@
5820
5821 case 0:
5822 /*
5823- * Lenghts are equal, thus changes must result in same length: An
5824+ * Lengths are equal, thus changes must result in same length: An
5825 * insert is only possible in combination with a delete.
5826 * 1: check if for identical strings
5827 */
[76dd250]5828diff -Naur vim72.orig/src/structs.h vim72/src/structs.h
5829--- vim72.orig/src/structs.h 2008-07-30 13:02:50.000000000 -0700
[61a83e8]5830+++ vim72/src/structs.h 2009-02-15 23:26:58.897901382 -0800
[76dd250]5831@@ -459,7 +459,7 @@
5832 typedef struct
5833 {
5834 int hide; /* TRUE when ":hide" was used */
5835-# ifdef FEAT_BROWSE
5836+# ifdef FEAT_BROWSE_CMD
5837 int browse; /* TRUE to invoke file dialog */
5838 # endif
5839 # ifdef FEAT_WINDOWS
5840@@ -1784,10 +1784,15 @@
5841 #endif
5842
5843 /*
5844- * The next three specify the offsets for displaying the buffer:
5845+ * "w_topline", "w_leftcol" and "w_skipcol" specify the offsets for
5846+ * displaying the buffer.
5847 */
5848 linenr_T w_topline; /* buffer line number of the line at the
5849 top of the window */
5850+#ifdef FEAT_AUTOCMD
5851+ char w_topline_was_set; /* flag set to TRUE when topline is set,
5852+ e.g. by winrestview() */
5853+#endif
5854 #ifdef FEAT_DIFF
5855 int w_topfill; /* number of filler lines above w_topline */
5856 int w_old_topfill; /* w_topfill at last redraw */
5857diff -Naur vim72.orig/src/tag.c vim72/src/tag.c
5858--- vim72.orig/src/tag.c 2008-07-16 14:31:30.000000000 -0700
[61a83e8]5859+++ vim72/src/tag.c 2009-02-15 23:28:59.441624807 -0800
[7352c10]5860@@ -515,7 +515,7 @@
5861 * If a count is supplied to the ":tag <name>" command, then
5862 * jump to count'th matching tag.
5863 */
5864- if (type == DT_TAG && count > 0)
5865+ if (type == DT_TAG && *tag != NUL && count > 0)
5866 cur_match = count - 1;
5867
5868 if (type == DT_SELECT || type == DT_JUMP
[76dd250]5869@@ -2725,7 +2725,24 @@
5870 */
5871 p_7f = vim_strchr(lbuf, 0x7f);
5872 if (p_7f == NULL)
5873+ {
5874+etag_fail:
5875+ if (vim_strchr(lbuf, '\n') == NULL)
5876+ {
5877+ /* Truncated line. Ignore it. */
5878+ if (p_verbose >= 5)
5879+ {
5880+ verbose_enter();
5881+ MSG(_("Ignoring long line in tags file"));
5882+ verbose_leave();
5883+ }
5884+ tagp->command = lbuf;
5885+ tagp->tagname = lbuf;
5886+ tagp->tagname_end = lbuf;
5887+ return OK;
5888+ }
5889 return FAIL;
5890+ }
5891
5892 /* Find ^A. If not found the line number is after the 0x7f */
5893 p = vim_strchr(p_7f, Ctrl_A);
5894@@ -2735,7 +2752,7 @@
5895 ++p;
5896
5897 if (!VIM_ISDIGIT(*p)) /* check for start of line number */
5898- return FAIL;
5899+ goto etag_fail;
5900 tagp->command = p;
5901
5902
5903@@ -2749,7 +2766,7 @@
5904 /* find end of tagname */
5905 for (p = p_7f - 1; !vim_iswordc(*p); --p)
5906 if (p == lbuf)
5907- return FAIL;
5908+ goto etag_fail;
5909 tagp->tagname_end = p + 1;
5910 while (p >= lbuf && vim_iswordc(*p))
5911 --p;
[5f4a45c9]5912diff -Naur vim72.orig/src/term.c vim72/src/term.c
5913--- vim72.orig/src/term.c 2008-07-27 04:48:06.000000000 -0700
[61a83e8]5914+++ vim72/src/term.c 2009-02-15 23:29:04.669961167 -0800
[5f4a45c9]5915@@ -4920,7 +4920,15 @@
5916 key_name[0] = KEY2TERMCAP0(key);
5917 key_name[1] = KEY2TERMCAP1(key);
5918 if (key_name[0] == KS_KEY)
5919- string[new_slen++] = key_name[1]; /* from ":set <M-b>=xx" */
5920+ {
5921+ /* from ":set <M-b>=xx" */
5922+#ifdef FEAT_MBYTE
5923+ if (has_mbyte)
5924+ new_slen += (*mb_char2bytes)(key_name[1], string + new_slen);
5925+ else
5926+#endif
5927+ string[new_slen++] = key_name[1];
5928+ }
5929 else
5930 {
5931 string[new_slen++] = K_SPECIAL;
5932diff -Naur vim72.orig/src/testdir/Makefile vim72/src/testdir/Makefile
5933--- vim72.orig/src/testdir/Makefile 2008-06-19 13:29:46.000000000 -0700
[61a83e8]5934+++ vim72/src/testdir/Makefile 2009-02-15 23:25:42.545008241 -0800
[5f4a45c9]5935@@ -26,15 +26,17 @@
5936
5937 .SUFFIXES: .in .out
5938
5939-nongui: nolog $(SCRIPTS)
5940- @echo
5941- @cat test.log
5942- @echo ALL DONE
5943+nongui: nolog $(SCRIPTS) report
5944+
5945+gui: nolog $(SCRIPTS) $(SCRIPTS_GUI) report
5946
5947-gui: nolog $(SCRIPTS) $(SCRIPTS_GUI)
5948+report:
5949 @echo
5950- @cat test.log
5951- @echo ALL DONE
5952+ @echo 'Test results:'
5953+ @/bin/sh -c "if test -f test.log; \
5954+ then cat test.log; echo TEST FAILURE; exit 1; \
5955+ else echo ALL DONE; \
5956+ fi"
5957
5958 $(SCRIPTS) $(SCRIPTS_GUI): $(VIMPROG)
5959
5960@@ -71,4 +73,4 @@
5961 test60.out: test60.vim
5962
5963 nolog:
5964- -echo Test results: >test.log
5965+ -rm -f test.log
[76dd250]5966diff -Naur vim72.orig/src/testdir/Make_ming.mak vim72/src/testdir/Make_ming.mak
5967--- vim72.orig/src/testdir/Make_ming.mak 1969-12-31 16:00:00.000000000 -0800
[61a83e8]5968+++ vim72/src/testdir/Make_ming.mak 2009-02-15 23:26:03.078324067 -0800
[76dd250]5969@@ -0,0 +1,91 @@
5970+# Makefile to run tests for Vim, on Dos-like machines
5971+# with sh.exe or zsh.exe in the path or not.
5972+#
5973+# Author: Bill McCarthy
5974+#
5975+# Note that test54 has been removed until it is fixed.
5976+#
5977+# Requires a set of Unix tools: echo, diff, etc.
5978+
5979+ifneq (sh.exe, $(SHELL))
5980+DEL = rm -f
5981+MV = mv
5982+CP = cp
5983+DIRSLASH = /
5984+else
5985+DEL = del
5986+MV = rename
5987+CP = copy
5988+DIRSLASH = \\
5989+endif
5990+
5991+VIMPROG = ..$(DIRSLASH)vim
5992+
5993+# Omitted:
5994+# test2 "\\tmp" doesn't work.
5995+# test10 'errorformat' is different
5996+# test12 can't unlink a swap file
5997+# test25 uses symbolic link
5998+# test27 can't edit file with "*" in file name
5999+# test31 16 bit version runs out of memory...
6000+
6001+SCRIPTS16 = test1.out test19.out test20.out test22.out \
6002+ test23.out test24.out test28.out test29.out \
6003+ test35.out test36.out test43.out \
6004+ test44.out test45.out test46.out test47.out \
6005+ test48.out test51.out test53.out \
6006+ test55.out test56.out test57.out test58.out test59.out \
6007+ test60.out test61.out test62.out test63.out test64.out
6008+
6009+# Had to remove test54 which doesn't work yet.
6010+# test54.out
6011+
6012+SCRIPTS = test3.out test4.out test5.out test6.out test7.out \
6013+ test8.out test9.out test11.out test13.out test14.out \
6014+ test15.out test17.out test18.out test21.out test26.out \
6015+ test30.out test31.out test32.out test33.out test34.out \
6016+ test37.out test38.out test39.out test40.out test41.out \
6017+ test42.out test52.out test65.out
6018+
6019+SCRIPTS32 = test50.out
6020+
6021+SCRIPTS_GUI = test16.out
6022+
6023+.SUFFIXES: .in .out
6024+
6025+vimall: fixff $(SCRIPTS16) $(SCRIPTS) $(SCRIPTS_GUI) $(SCRIPTS32)
6026+ echo ALL DONE
6027+
6028+nongui: fixff $(SCRIPTS16) $(SCRIPTS)
6029+ echo ALL DONE
6030+
6031+small:
6032+ echo ALL DONE
6033+
6034+gui: fixff $(SCRIPTS16) $(SCRIPTS) $(SCRIPTS_GUI)
6035+ echo ALL DONE
6036+
6037+win32: fixff $(SCRIPTS16) $(SCRIPTS) $(SCRIPTS32)
6038+ echo ALL DONE
6039+
6040+fixff:
6041+ -$(VIMPROG) -u dos.vim --noplugin "+argdo set ff=dos|upd" +q *.in *.ok
6042+
6043+clean:
6044+ -$(DEL) *.out
6045+ -$(DEL) test.ok
6046+ -$(DEL) small.vim
6047+ -$(DEL) tiny.vim
6048+ -$(DEL) mbyte.vim
6049+ -$(DEL) X*
6050+ -$(DEL) viminfo
6051+
6052+.in.out:
6053+ $(CP) $*.ok test.ok
6054+ $(VIMPROG) -u dos.vim -U NONE --noplugin -s dotest.in $*.in
6055+ diff test.out $*.ok
6056+ -$(DEL) $*.out
6057+ $(MV) test.out $*.out
6058+ -$(DEL) X*
6059+ -$(DEL) test.ok
6060+ -$(DEL) viminfo
6061diff -Naur vim72.orig/src/testdir/test42.ok vim72/src/testdir/test42.ok
6062--- vim72.orig/src/testdir/test42.ok 2008-02-20 04:27:37.000000000 -0800
[61a83e8]6063+++ vim72/src/testdir/test42.ok 2009-02-15 23:26:34.640348093 -0800
[76dd250]6064@@ -20,7 +20,7 @@
6065 ucs-2
6066
6067
6068- fileencoding=ucs-2le
6069+ fileencoding=utf-16le
6070 bomb
6071 ucs-2le
6072
6073diff -Naur vim72.orig/src/ui.c vim72/src/ui.c
6074--- vim72.orig/src/ui.c 2008-07-14 11:14:56.000000000 -0700
[61a83e8]6075+++ vim72/src/ui.c 2009-02-15 23:27:36.164291102 -0800
[76dd250]6076@@ -1820,7 +1820,7 @@
6077 #ifdef HAVE_DUP
6078 /* Use stderr for stdin, also works for shell commands. */
6079 close(0);
6080- dup(2);
6081+ ignored = dup(2);
6082 #else
6083 read_cmd_fd = 2; /* read from stderr instead of stdin */
6084 #endif
6085@@ -2020,7 +2020,7 @@
6086
6087 if (value == NULL || *length == 0)
6088 {
6089- clip_free_selection(cbd); /* ??? [what's the query?] */
6090+ clip_free_selection(cbd); /* nothing received, clear register */
6091 *(int *)success = FALSE;
6092 return;
6093 }
6094@@ -2076,7 +2076,7 @@
6095 text_prop.value = (unsigned char *)value;
6096 text_prop.encoding = *type;
6097 text_prop.format = *format;
6098- text_prop.nitems = STRLEN(value);
6099+ text_prop.nitems = len;
6100 status = XmbTextPropertyToTextList(X_DISPLAY, &text_prop,
6101 &text_list, &n_text);
6102 if (status != Success || n_text < 1)
6103@@ -2110,6 +2110,8 @@
6104 int i;
6105 int nbytes = 0;
6106 char_u *buffer;
6107+ time_t start_time;
6108+ int timed_out = FALSE;
6109
6110 for (i =
6111 #ifdef FEAT_MBYTE
6112@@ -2129,6 +2131,7 @@
6113 case 3: type = text_atom; break;
6114 default: type = XA_STRING;
6115 }
6116+ success = MAYBE;
6117 XtGetSelectionValue(myShell, cbd->sel_atom, type,
6118 clip_x11_request_selection_cb, (XtPointer)&success, CurrentTime);
6119
6120@@ -2141,27 +2144,48 @@
6121 * characters, then they will appear before the one that requested the
6122 * paste! Don't worry, we will catch up with any other events later.
6123 */
6124- for (;;)
6125+ start_time = time(NULL);
6126+ while (success == MAYBE)
6127 {
6128- if (XCheckTypedEvent(dpy, SelectionNotify, &event))
6129- break;
6130- if (XCheckTypedEvent(dpy, SelectionRequest, &event))
6131- /* We may get a SelectionRequest here and if we don't handle
6132- * it we hang. KDE klipper does this, for example. */
6133+ if (XCheckTypedEvent(dpy, SelectionNotify, &event)
6134+ || XCheckTypedEvent(dpy, SelectionRequest, &event)
6135+ || XCheckTypedEvent(dpy, PropertyNotify, &event))
6136+ {
6137+ /* This is where clip_x11_request_selection_cb() should be
6138+ * called. It may actually happen a bit later, so we loop
6139+ * until "success" changes.
6140+ * We may get a SelectionRequest here and if we don't handle
6141+ * it we hang. KDE klipper does this, for example.
6142+ * We need to handle a PropertyNotify for large selections. */
6143 XtDispatchEvent(&event);
6144+ continue;
6145+ }
6146+
6147+ /* Time out after 2 to 3 seconds to avoid that we hang when the
6148+ * other process doesn't respond. Note that the SelectionNotify
6149+ * event may still come later when the selection owner comes back
6150+ * to life and the text gets inserted unexpectedly. Don't know
6151+ * why that happens or how to avoid that :-(. */
6152+ if (time(NULL) > start_time + 2)
6153+ {
6154+ timed_out = TRUE;
6155+ break;
6156+ }
6157
6158 /* Do we need this? Probably not. */
6159 XSync(dpy, False);
6160
6161- /* Bernhard Walle solved a slow paste response in an X terminal by
6162- * adding: usleep(10000); here. */
6163+ /* Wait for 1 msec to avoid that we eat up all CPU time. */
6164+ ui_delay(1L, TRUE);
6165 }
6166
6167- /* this is where clip_x11_request_selection_cb() is actually called */
6168- XtDispatchEvent(&event);
6169-
6170- if (success)
6171+ if (success == TRUE)
6172 return;
6173+
6174+ /* don't do a retry with another type after timing out, otherwise we
6175+ * hang for 15 seconds. */
6176+ if (timed_out)
6177+ break;
6178 }
6179
6180 /* Final fallback position - use the X CUT_BUFFER0 store */
6181diff -Naur vim72.orig/src/version.c vim72/src/version.c
6182--- vim72.orig/src/version.c 2008-08-09 07:24:52.000000000 -0700
[61a83e8]6183+++ vim72/src/version.c 2009-02-15 23:30:11.834265120 -0800
6184@@ -677,9 +677,216 @@
[76dd250]6185 static int included_patches[] =
6186 { /* Add new patch number below this line */
6187 /**/
[61a83e8]6188+ 108,
6189+/**/
6190+ 107,
6191+/**/
6192+ 106,
6193+/**/
6194+ 105,
6195+/**/
6196+ 104,
6197+/**/
6198+ 103,
6199+/**/
[9a875fd]6200+ 102,
6201+/**/
6202+ 100,
6203+/**/
6204+ 99,
6205+/**/
6206+ 98,
6207+/**/
6208+ 97,
6209+/**/
6210+ 96,
6211+/**/
6212+ 95,
6213+/**/
6214+ 94,
6215+/**/
[5f4a45c9]6216+ 92,
6217+/**/
6218+ 91,
6219+/**/
6220+ 90,
6221+/**/
6222+ 87,
6223+/**/
6224+ 86,
6225+/**/
6226+ 85,
6227+/**/
[7352c10]6228+ 84,
6229+/**/
6230+ 83,
6231+/**/
6232+ 82,
6233+/**/
6234+ 81,
6235+/**/
6236+ 80,
6237+/**/
[43c52a1]6238+ 79,
6239+/**/
6240+ 78,
6241+/**/
6242+ 77,
6243+/**/
[1f22c7c]6244+ 76,
6245+/**/
6246+ 75,
6247+/**/
6248+ 73,
6249+/**/
6250+ 70,
6251+/**/
[76dd250]6252+ 69,
6253+/**/
6254+ 68,
6255+/**/
6256+ 67,
6257+/**/
6258+ 66,
6259+/**/
6260+ 65,
6261+/**/
6262+ 64,
6263+/**/
6264+ 63,
6265+/**/
6266+ 62,
6267+/**/
6268+ 61,
6269+/**/
6270+ 60,
6271+/**/
6272+ 59,
6273+/**/
6274+ 58,
6275+/**/
6276+ 57,
6277+/**/
6278+ 56,
6279+/**/
6280+ 55,
6281+/**/
6282+ 54,
6283+/**/
6284+ 53,
6285+/**/
6286+ 52,
6287+/**/
6288+ 51,
6289+/**/
6290+ 50,
6291+/**/
6292+ 48,
6293+/**/
6294+ 47,
6295+/**/
6296+ 46,
6297+/**/
6298+ 45,
6299+/**/
6300+ 44,
6301+/**/
6302+ 43,
6303+/**/
6304+ 42,
6305+/**/
6306+ 40,
6307+/**/
6308+ 39,
6309+/**/
6310+ 38,
6311+/**/
6312+ 37,
6313+/**/
6314+ 35,
6315+/**/
6316+ 34,
6317+/**/
6318+ 33,
6319+/**/
6320+ 32,
6321+/**/
6322+ 31,
6323+/**/
6324+ 30,
6325+/**/
6326+ 29,
6327+/**/
6328+ 28,
6329+/**/
6330+ 27,
6331+/**/
6332+ 26,
6333+/**/
6334+ 25,
6335+/**/
6336+ 24,
6337+/**/
6338+ 23,
6339+/**/
6340+ 22,
6341+/**/
6342+ 21,
6343+/**/
6344+ 20,
6345+/**/
6346+ 19,
6347+/**/
6348+ 18,
6349+/**/
6350+ 17,
6351+/**/
6352+ 16,
6353+/**/
6354+ 15,
6355+/**/
6356+ 14,
6357+/**/
6358+ 13,
6359+/**/
6360+ 12,
6361+/**/
6362+ 11,
6363+/**/
6364+ 10,
6365+/**/
6366+ 9,
6367+/**/
6368+ 8,
6369+/**/
6370+ 6,
6371+/**/
6372+ 5,
6373+/**/
6374+ 4,
6375+/**/
6376+ 3,
6377+/**/
6378+ 2,
6379+/**/
6380+ 1,
6381+/**/
6382 0
6383 };
6384
6385+/*
6386+ * Place to put a short description when adding a feature with a patch.
6387+ * Keep it short, e.g.,: "relative numbers", "persistent undo".
6388+ * Also add a comment marker to separate the lines.
6389+ * See the official Vim patches for the diff format: It must use a context of
[1f22c7c]6390+ * one line only. Create it by hand or use "diff -C2" and edit the patch.
[76dd250]6391+ */
6392+static char *(extra_patches[]) =
6393+{ /* Add your patch description below this line */
6394+/**/
6395+ NULL
6396+};
6397+
6398 int
6399 highest_patch()
6400 {
[61a83e8]6401@@ -786,7 +993,7 @@
[76dd250]6402 MSG_PUTS(_("\nRISC OS version"));
6403 #endif
6404 #ifdef VMS
6405- MSG_PUTS("\nOpenVMS version");
6406+ MSG_PUTS(_("\nOpenVMS version"));
6407 # ifdef HAVE_PATHDEF
6408 if (*compiled_arch != NUL)
6409 {
[61a83e8]6410@@ -825,6 +1032,19 @@
[76dd250]6411 }
6412 }
6413
6414+ /* Print the list of extra patch descriptions if there is at least one. */
6415+ if (extra_patches[0] != NULL)
6416+ {
6417+ MSG_PUTS(_("\nExtra patches: "));
6418+ s = "";
6419+ for (i = 0; extra_patches[i] != NULL; ++i)
6420+ {
6421+ MSG_PUTS(s);
6422+ s = ", ";
6423+ MSG_PUTS(extra_patches[i]);
6424+ }
6425+ }
6426+
6427 #ifdef MODIFIED_BY
6428 MSG_PUTS("\n");
6429 MSG_PUTS(_("Modified by "));
6430diff -Naur vim72.orig/src/vim.h vim72/src/vim.h
6431--- vim72.orig/src/vim.h 2008-08-09 09:03:38.000000000 -0700
[61a83e8]6432+++ vim72/src/vim.h 2009-02-15 23:27:12.174753177 -0800
[76dd250]6433@@ -341,8 +341,14 @@
6434 #ifdef BACKSLASH_IN_FILENAME
6435 # define PATH_ESC_CHARS ((char_u *)" \t\n*?[{`%#'\"|!<")
6436 #else
6437-# define PATH_ESC_CHARS ((char_u *)" \t\n*?[{`$\\%#'\"|!<")
6438-# define SHELL_ESC_CHARS ((char_u *)" \t\n*?[{`$\\%#'\"|!<>();&")
6439+# ifdef VMS
6440+ /* VMS allows a lot of characters in the file name */
6441+# define PATH_ESC_CHARS ((char_u *)" \t\n*?{`\\%#'\"|!")
6442+# define SHELL_ESC_CHARS ((char_u *)" \t\n*?{`\\%#'|!()&")
6443+# else
6444+# define PATH_ESC_CHARS ((char_u *)" \t\n*?[{`$\\%#'\"|!<")
6445+# define SHELL_ESC_CHARS ((char_u *)" \t\n*?[{`$\\%#'\"|!<>();&")
6446+# endif
6447 #endif
6448
6449 #define NUMBUFLEN 30 /* length of a buffer to store a number in ASCII */
6450@@ -370,7 +376,7 @@
6451 * Define __w64 as an empty token for everything but MSVC 7.x or later.
6452 */
6453 # if !defined(_MSC_VER) || (_MSC_VER < 1300)
6454-# define __w64
6455+# define __w64
6456 # endif
6457 typedef unsigned long __w64 long_u;
6458 typedef long __w64 long_i;
6459@@ -1728,7 +1734,8 @@
6460 #define VV_MOUSE_COL 51
6461 #define VV_OP 52
6462 #define VV_SEARCHFORWARD 53
6463-#define VV_LEN 54 /* number of v: vars */
6464+#define VV_OLDFILES 54
6465+#define VV_LEN 55 /* number of v: vars */
6466
6467 #ifdef FEAT_CLIPBOARD
6468
6469@@ -1979,6 +1986,9 @@
6470 # endif
6471 #endif
6472
6473+#ifndef FEAT_NETBEANS_INTG
6474+# undef NBDEBUG
6475+#endif
6476 #ifdef NBDEBUG /* Netbeans debugging. */
6477 # include "nbdebug.h"
6478 #else
6479@@ -2054,4 +2064,10 @@
6480 #define DOSO_VIMRC 1 /* loading vimrc file */
6481 #define DOSO_GVIMRC 2 /* loading gvimrc file */
6482
6483+/* flags for read_viminfo() and children */
6484+#define VIF_WANT_INFO 1 /* load non-mark info */
6485+#define VIF_WANT_MARKS 2 /* load file marks */
6486+#define VIF_FORCEIT 4 /* overwrite info already read */
6487+#define VIF_GET_OLDFILES 8 /* load v:oldfiles */
6488+
6489 #endif /* VIM__H */
6490diff -Naur vim72.orig/src/window.c vim72/src/window.c
6491--- vim72.orig/src/window.c 2008-08-06 04:00:30.000000000 -0700
[61a83e8]6492+++ vim72/src/window.c 2009-02-15 23:27:36.164291102 -0800
[76dd250]6493@@ -4028,14 +4028,14 @@
6494 if (mch_dirname(cwd, MAXPATHL) == OK)
6495 globaldir = vim_strsave(cwd);
6496 }
6497- mch_chdir((char *)curwin->w_localdir);
6498- shorten_fnames(TRUE);
6499+ if (mch_chdir((char *)curwin->w_localdir) == 0)
6500+ shorten_fnames(TRUE);
6501 }
6502 else if (globaldir != NULL)
6503 {
6504 /* Window doesn't have a local directory and we are not in the global
6505 * directory: Change to the global directory. */
6506- mch_chdir((char *)globaldir);
6507+ ignored = mch_chdir((char *)globaldir);
6508 vim_free(globaldir);
6509 globaldir = NULL;
6510 shorten_fnames(TRUE);
6511diff -Naur vim72.orig/src/workshop.c vim72/src/workshop.c
6512--- vim72.orig/src/workshop.c 2008-06-21 11:53:26.000000000 -0700
[61a83e8]6513+++ vim72/src/workshop.c 2009-02-15 23:27:29.719875680 -0800
[76dd250]6514@@ -1121,8 +1121,12 @@
6515 ? (char *)curbuf->b_sfname : "<None>");
6516 #endif
6517
6518- strcpy(ffname, (char *) curbuf->b_ffname);
6519- *filename = ffname; /* copy so nobody can change b_ffname */
6520+ if (curbuf->b_ffname == NULL)
6521+ ffname[0] = NUL;
6522+ else
6523+ /* copy so nobody can change b_ffname */
6524+ strcpy(ffname, (char *) curbuf->b_ffname);
6525+ *filename = ffname;
6526 *curLine = curwin->w_cursor.lnum;
6527 *curCol = curwin->w_cursor.col;
6528
Note: See TracBrowser for help on using the repository browser.