- patchlevel 313
This commit is contained in:
parent
a92e915176
commit
242d8e65a5
320
7.4.313
Normal file
320
7.4.313
Normal file
@ -0,0 +1,320 @@
|
||||
To: vim_dev@googlegroups.com
|
||||
Subject: Patch 7.4.313
|
||||
Fcc: outbox
|
||||
From: Bram Moolenaar <Bram@moolenaar.net>
|
||||
Mime-Version: 1.0
|
||||
Content-Type: text/plain; charset=UTF-8
|
||||
Content-Transfer-Encoding: 8bit
|
||||
------------
|
||||
|
||||
Patch 7.4.313 (after 7.4.310)
|
||||
Problem: Changing the return value of getpos() causes an error. (Jie Zhu)
|
||||
Solution: Revert getpos() and add getcurpos().
|
||||
Files: src/eval.c, src/testdir/test_eval.in, src/testdir/test_eval.ok,
|
||||
runtime/doc/eval.txt
|
||||
|
||||
|
||||
*** ../vim-7.4.312/src/eval.c 2014-05-28 18:22:37.876225054 +0200
|
||||
--- src/eval.c 2014-05-28 20:11:55.364282457 +0200
|
||||
***************
|
||||
*** 560,565 ****
|
||||
--- 560,566 ----
|
||||
static void f_getline __ARGS((typval_T *argvars, typval_T *rettv));
|
||||
static void f_getmatches __ARGS((typval_T *argvars, typval_T *rettv));
|
||||
static void f_getpid __ARGS((typval_T *argvars, typval_T *rettv));
|
||||
+ static void f_getcurpos __ARGS((typval_T *argvars, typval_T *rettv));
|
||||
static void f_getpos __ARGS((typval_T *argvars, typval_T *rettv));
|
||||
static void f_getqflist __ARGS((typval_T *argvars, typval_T *rettv));
|
||||
static void f_getreg __ARGS((typval_T *argvars, typval_T *rettv));
|
||||
***************
|
||||
*** 7967,7972 ****
|
||||
--- 7968,7974 ----
|
||||
{"getcmdline", 0, 0, f_getcmdline},
|
||||
{"getcmdpos", 0, 0, f_getcmdpos},
|
||||
{"getcmdtype", 0, 0, f_getcmdtype},
|
||||
+ {"getcurpos", 0, 0, f_getcurpos},
|
||||
{"getcwd", 0, 0, f_getcwd},
|
||||
{"getfontname", 0, 1, f_getfontname},
|
||||
{"getfperm", 1, 1, f_getfperm},
|
||||
***************
|
||||
*** 11780,11785 ****
|
||||
--- 11782,11800 ----
|
||||
rettv->vval.v_number = mch_get_pid();
|
||||
}
|
||||
|
||||
+ static void getpos_both __ARGS((typval_T *argvars, typval_T *rettv, int getcurpos));
|
||||
+
|
||||
+ /*
|
||||
+ * "getcurpos()" function
|
||||
+ */
|
||||
+ static void
|
||||
+ f_getcurpos(argvars, rettv)
|
||||
+ typval_T *argvars;
|
||||
+ typval_T *rettv;
|
||||
+ {
|
||||
+ getpos_both(argvars, rettv, TRUE);
|
||||
+ }
|
||||
+
|
||||
/*
|
||||
* "getpos(string)" function
|
||||
*/
|
||||
***************
|
||||
*** 11788,11793 ****
|
||||
--- 11803,11817 ----
|
||||
typval_T *argvars;
|
||||
typval_T *rettv;
|
||||
{
|
||||
+ getpos_both(argvars, rettv, FALSE);
|
||||
+ }
|
||||
+
|
||||
+ static void
|
||||
+ getpos_both(argvars, rettv, getcurpos)
|
||||
+ typval_T *argvars;
|
||||
+ typval_T *rettv;
|
||||
+ int getcurpos;
|
||||
+ {
|
||||
pos_T *fp;
|
||||
list_T *l;
|
||||
int fnum = -1;
|
||||
***************
|
||||
*** 11795,11801 ****
|
||||
if (rettv_list_alloc(rettv) == OK)
|
||||
{
|
||||
l = rettv->vval.v_list;
|
||||
! fp = var2fpos(&argvars[0], TRUE, &fnum);
|
||||
if (fnum != -1)
|
||||
list_append_number(l, (varnumber_T)fnum);
|
||||
else
|
||||
--- 11819,11828 ----
|
||||
if (rettv_list_alloc(rettv) == OK)
|
||||
{
|
||||
l = rettv->vval.v_list;
|
||||
! if (getcurpos)
|
||||
! fp = &curwin->w_cursor;
|
||||
! else
|
||||
! fp = var2fpos(&argvars[0], TRUE, &fnum);
|
||||
if (fnum != -1)
|
||||
list_append_number(l, (varnumber_T)fnum);
|
||||
else
|
||||
***************
|
||||
*** 11810,11816 ****
|
||||
(fp != NULL) ? (varnumber_T)fp->coladd :
|
||||
#endif
|
||||
(varnumber_T)0);
|
||||
! if (fp == &curwin->w_cursor)
|
||||
list_append_number(l, (varnumber_T)curwin->w_curswant + 1);
|
||||
}
|
||||
else
|
||||
--- 11837,11843 ----
|
||||
(fp != NULL) ? (varnumber_T)fp->coladd :
|
||||
#endif
|
||||
(varnumber_T)0);
|
||||
! if (getcurpos)
|
||||
list_append_number(l, (varnumber_T)curwin->w_curswant + 1);
|
||||
}
|
||||
else
|
||||
*** ../vim-7.4.312/src/testdir/test_eval.in 2014-05-28 14:32:47.160104334 +0200
|
||||
--- src/testdir/test_eval.in 2014-05-28 20:14:27.048283785 +0200
|
||||
***************
|
||||
*** 190,198 ****
|
||||
:$put =v:exception
|
||||
:endtry
|
||||
:"
|
||||
! :$put ='{{{1 setpos/getpos'
|
||||
/^012345678
|
||||
! 6l:let sp = getpos('.')
|
||||
0:call setpos('.', sp)
|
||||
jyl:$put
|
||||
:"
|
||||
--- 190,198 ----
|
||||
:$put =v:exception
|
||||
:endtry
|
||||
:"
|
||||
! :$put ='{{{1 getcurpos/setpos'
|
||||
/^012345678
|
||||
! 6l:let sp = getcurpos()
|
||||
0:call setpos('.', sp)
|
||||
jyl:$put
|
||||
:"
|
||||
*** ../vim-7.4.312/src/testdir/test_eval.ok 2014-05-28 14:32:47.160104334 +0200
|
||||
--- src/testdir/test_eval.ok 2014-05-28 20:14:43.316283927 +0200
|
||||
***************
|
||||
*** 346,350 ****
|
||||
Bar exists: 1
|
||||
func Bar exists: 1
|
||||
Vim(call):E116: Invalid arguments for function append
|
||||
! {{{1 setpos/getpos
|
||||
6
|
||||
--- 346,350 ----
|
||||
Bar exists: 1
|
||||
func Bar exists: 1
|
||||
Vim(call):E116: Invalid arguments for function append
|
||||
! {{{1 getcurpos/setpos
|
||||
6
|
||||
*** ../vim-7.4.312/runtime/doc/eval.txt 2014-05-28 18:22:37.872225054 +0200
|
||||
--- runtime/doc/eval.txt 2014-05-28 20:27:57.092290876 +0200
|
||||
***************
|
||||
*** 1808,1817 ****
|
||||
getcmdline() String return the current command-line
|
||||
getcmdpos() Number return cursor position in command-line
|
||||
getcmdtype() String return the current command-line type
|
||||
getcwd() String the current working directory
|
||||
getfperm( {fname}) String file permissions of file {fname}
|
||||
getfsize( {fname}) Number size in bytes of file {fname}
|
||||
- getfontname( [{name}]) String name of font being used
|
||||
getftime( {fname}) Number last modification time of file
|
||||
getftype( {fname}) String description of type of file {fname}
|
||||
getline( {lnum}) String line {lnum} of current buffer
|
||||
--- 1808,1818 ----
|
||||
getcmdline() String return the current command-line
|
||||
getcmdpos() Number return cursor position in command-line
|
||||
getcmdtype() String return the current command-line type
|
||||
+ getcurpos() List position of the cursor
|
||||
getcwd() String the current working directory
|
||||
+ getfontname( [{name}]) String name of font being used
|
||||
getfperm( {fname}) String file permissions of file {fname}
|
||||
getfsize( {fname}) Number size in bytes of file {fname}
|
||||
getftime( {fname}) Number last modification time of file
|
||||
getftype( {fname}) String description of type of file {fname}
|
||||
getline( {lnum}) String line {lnum} of current buffer
|
||||
***************
|
||||
*** 2606,2613 ****
|
||||
with two, three or four item:
|
||||
[{lnum}, {col}, {off}]
|
||||
[{lnum}, {col}, {off}, {curswant}]
|
||||
! This is like the return value of |getpos()|, but without the
|
||||
! first item.
|
||||
|
||||
Does not change the jumplist.
|
||||
If {lnum} is greater than the number of lines in the buffer,
|
||||
--- 2607,2614 ----
|
||||
with two, three or four item:
|
||||
[{lnum}, {col}, {off}]
|
||||
[{lnum}, {col}, {off}, {curswant}]
|
||||
! This is like the return value of |getpos()| or |getcurpos|,
|
||||
! but without the first item.
|
||||
|
||||
Does not change the jumplist.
|
||||
If {lnum} is greater than the number of lines in the buffer,
|
||||
***************
|
||||
*** 2617,2622 ****
|
||||
--- 2618,2625 ----
|
||||
the cursor will be positioned at the last character in the
|
||||
line.
|
||||
If {col} is zero, the cursor will stay in the current column.
|
||||
+ If {curswant} is given it is used to set the preferred column
|
||||
+ for vertical movment. Otherwise {col} is used.
|
||||
When 'virtualedit' is used {off} specifies the offset in
|
||||
screen columns from the start of the character. E.g., a
|
||||
position within a <Tab> or after the last character.
|
||||
***************
|
||||
*** 3339,3344 ****
|
||||
--- 3347,3363 ----
|
||||
Returns an empty string otherwise.
|
||||
Also see |getcmdpos()|, |setcmdpos()| and |getcmdline()|.
|
||||
|
||||
+ *getcurpos()*
|
||||
+ getcurpos() Get the position of the cursor. This is like getpos('.'), but
|
||||
+ includes an extra item in the list:
|
||||
+ [bufnum, lnum, col, off, curswant]
|
||||
+ The "curswant" number is the preferred column when moving the
|
||||
+ cursor vertically.
|
||||
+ This can be used to save and restore the cursor position: >
|
||||
+ let save_cursor = getcurpos()
|
||||
+ MoveTheCursorAround
|
||||
+ call setpos('.', save_cursor)
|
||||
+
|
||||
*getcwd()*
|
||||
getcwd() The result is a String, which is the name of the current
|
||||
working directory.
|
||||
***************
|
||||
*** 4493,4502 ****
|
||||
|
||||
*getpos()*
|
||||
getpos({expr}) Get the position for {expr}. For possible values of {expr}
|
||||
! see |line()|.
|
||||
! The result is a |List| with four or five numbers:
|
||||
[bufnum, lnum, col, off]
|
||||
- [bufnum, lnum, col, off, curswant]
|
||||
"bufnum" is zero, unless a mark like '0 or 'A is used, then it
|
||||
is the buffer number of the mark.
|
||||
"lnum" and "col" are the position in the buffer. The first
|
||||
--- 4517,4526 ----
|
||||
|
||||
*getpos()*
|
||||
getpos({expr}) Get the position for {expr}. For possible values of {expr}
|
||||
! see |line()|. For getting the cursor position see
|
||||
! |getcurpos()|.
|
||||
! The result is a |List| with four numbers:
|
||||
[bufnum, lnum, col, off]
|
||||
"bufnum" is zero, unless a mark like '0 or 'A is used, then it
|
||||
is the buffer number of the mark.
|
||||
"lnum" and "col" are the position in the buffer. The first
|
||||
***************
|
||||
*** 4505,4520 ****
|
||||
it is the offset in screen columns from the start of the
|
||||
character. E.g., a position within a <Tab> or after the last
|
||||
character.
|
||||
- The "curswant" number is only added for getpos('.'), it is the
|
||||
- preferred column when moving the cursor vertically.
|
||||
Note that for '< and '> Visual mode matters: when it is "V"
|
||||
(visual line mode) the column of '< is zero and the column of
|
||||
'> is a large number.
|
||||
! This can be used to save and restore the cursor position: >
|
||||
! let save_cursor = getpos(".")
|
||||
! MoveTheCursorAround
|
||||
! call setpos('.', save_cursor)
|
||||
! < Also see |setpos()|.
|
||||
|
||||
or({expr}, {expr}) *or()*
|
||||
Bitwise OR on the two arguments. The arguments are converted
|
||||
--- 4529,4542 ----
|
||||
it is the offset in screen columns from the start of the
|
||||
character. E.g., a position within a <Tab> or after the last
|
||||
character.
|
||||
Note that for '< and '> Visual mode matters: when it is "V"
|
||||
(visual line mode) the column of '< is zero and the column of
|
||||
'> is a large number.
|
||||
! This can be used to save and restore the position of a mark: >
|
||||
! let save_a_mark = getpos("'a")
|
||||
! ...
|
||||
! call setpos(''a', save_a_mark
|
||||
! < Also see |getcurpos()| and |setpos()|.
|
||||
|
||||
or({expr}, {expr}) *or()*
|
||||
Bitwise OR on the two arguments. The arguments are converted
|
||||
***************
|
||||
*** 5347,5353 ****
|
||||
Returns 0 when the position could be set, -1 otherwise.
|
||||
An error message is given if {expr} is invalid.
|
||||
|
||||
! Also see |getpos()|
|
||||
|
||||
This does not restore the preferred column for moving
|
||||
vertically; if you set the cursor position with this, |j| and
|
||||
--- 5369,5375 ----
|
||||
Returns 0 when the position could be set, -1 otherwise.
|
||||
An error message is given if {expr} is invalid.
|
||||
|
||||
! Also see |getpos()| and |getcurpos()|.
|
||||
|
||||
This does not restore the preferred column for moving
|
||||
vertically; if you set the cursor position with this, |j| and
|
||||
*** ../vim-7.4.312/src/version.c 2014-05-28 18:22:37.880225054 +0200
|
||||
--- src/version.c 2014-05-28 20:15:52.164284530 +0200
|
||||
***************
|
||||
*** 736,737 ****
|
||||
--- 736,739 ----
|
||||
{ /* Add new patch number below this line */
|
||||
+ /**/
|
||||
+ 313,
|
||||
/**/
|
||||
|
||||
--
|
||||
hundred-and-one symptoms of being an internet addict:
|
||||
225. You sign up for free subscriptions for all the computer magazines
|
||||
|
||||
/// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net \\\
|
||||
/// sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
|
||||
\\\ an exciting new programming language -- http://www.Zimbu.org ///
|
||||
\\\ help me help AIDS victims -- http://ICCF-Holland.org ///
|
Loading…
Reference in New Issue
Block a user