Mercurial > vim
changeset 5942:66eead134d68 v7.4.312
updated for version 7.4.312
Problem: Cannot figure out what argument list is being used for a window.
Solution: Add the arglistid() function. (Marcin Szamotulski)
| author | Bram Moolenaar <bram@vim.org> |
|---|---|
| date | Wed, 28 May 2014 18:22:57 +0200 |
| parents | 30e07910c3fe |
| children | 67f652389aff |
| files | runtime/doc/eval.txt runtime/doc/usr_41.txt src/eval.c src/ex_docmd.c src/globals.h src/main.c src/structs.h src/version.c |
| diffstat | 8 files changed, 58 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/runtime/doc/eval.txt +++ b/runtime/doc/eval.txt @@ -1716,6 +1716,8 @@ append( {lnum}, {string}) Number append append( {lnum}, {list}) Number append lines {list} below line {lnum} argc() Number number of files in the argument list argidx() Number current index in the argument list +arglistid( [{winnr}, [ {tabnr}]]) + Number argument list id argv( {nr}) String {nr} entry of the argument list argv( ) List the argument list asin( {expr}) Float arc sine of {expr} @@ -2103,6 +2105,18 @@ argc() The result is the number of file argidx() The result is the current index in the argument list. 0 is the first file. argc() - 1 is the last one. See |arglist|. + *arglistid()* +arglistid([{winnr}, [ {tabnr} ]]) + Return the argument list ID. This is a number which + identifies the argument list being used. Zero is used for the + global argument list. + Return zero if the arguments are invalid. + + Without arguments use the current window. + With {winnr} only use this window in the current tab page. + With {winnr} and {tabnr} use the window in the specified tab + page. + *argv()* argv([{nr}]) The result is the {nr}th file in the argument list of the current window. See |arglist|. "argv(0)" is the first one.
--- a/runtime/doc/usr_41.txt +++ b/runtime/doc/usr_41.txt @@ -772,6 +772,7 @@ Date and Time: *date-functions* *time Buffers, windows and the argument list: argc() number of entries in the argument list argidx() current position in the argument list + arglistid() get id of the argument list argv() get one entry from the argument list bufexists() check if a buffer exists buflisted() check if a buffer exists and is listed
--- a/src/eval.c +++ b/src/eval.c @@ -463,6 +463,7 @@ static void f_and __ARGS((typval_T *argv static void f_append __ARGS((typval_T *argvars, typval_T *rettv)); static void f_argc __ARGS((typval_T *argvars, typval_T *rettv)); static void f_argidx __ARGS((typval_T *argvars, typval_T *rettv)); +static void f_arglistid __ARGS((typval_T *argvars, typval_T *rettv)); static void f_argv __ARGS((typval_T *argvars, typval_T *rettv)); #ifdef FEAT_FLOAT static void f_asin __ARGS((typval_T *argvars, typval_T *rettv)); @@ -7875,6 +7876,7 @@ static struct fst {"append", 2, 2, f_append}, {"argc", 0, 0, f_argc}, {"argidx", 0, 0, f_argidx}, + {"arglistid", 0, 2, f_arglistid}, {"argv", 0, 1, f_argv}, #ifdef FEAT_FLOAT {"asin", 1, 1, f_asin}, /* WJMc */ @@ -8859,6 +8861,41 @@ f_argidx(argvars, rettv) } /* + * "arglistid()" function + */ + static void +f_arglistid(argvars, rettv) + typval_T *argvars UNUSED; + typval_T *rettv; +{ + win_T *wp; + tabpage_T *tp = NULL; + long n; + + rettv->vval.v_number = -1; + if (argvars[0].v_type != VAR_UNKNOWN) + { + if (argvars[1].v_type != VAR_UNKNOWN) + { + n = get_tv_number(&argvars[1]); + if (n >= 0) + tp = find_tabpage(n); + } + else + tp = curtab; + + if (tp != NULL) + { + wp = find_win_by_nr(&argvars[0], tp); + if (wp != NULL) + rettv->vval.v_number = wp->w_alist->id; + } + } + else + rettv->vval.v_number = curwin->w_alist->id; +} + +/* * "argv(nr)" function */ static void
--- a/src/ex_docmd.c +++ b/src/ex_docmd.c @@ -7211,6 +7211,7 @@ alist_new() else { curwin->w_alist->al_refcount = 1; + curwin->w_alist->id = ++max_alist_id; alist_init(curwin->w_alist); } }
--- a/src/globals.h +++ b/src/globals.h @@ -601,6 +601,7 @@ EXTERN int mf_dont_release INIT(= FALSE) * to this when the window is using the global argument list. */ EXTERN alist_T global_alist; /* global argument list */ +EXTERN int max_alist_id INIT(= 0); /* the previous argument list id */ EXTERN int arg_had_last INIT(= FALSE); /* accessed last file in global_alist */
--- a/src/main.c +++ b/src/main.c @@ -322,6 +322,7 @@ main init_yank(); /* init yank buffers */ alist_init(&global_alist); /* Init the argument list to empty. */ + global_alist.id = 0; /* * Set the default values for the options.