-*todo.txt* For Vim version 7.0aa. Last change: 2005 Sep 20
+*todo.txt* For Vim version 7.0aa. Last change: 2005 Sep 25
VIM REFERENCE MANUAL by Bram Moolenaar
*known-bugs*
-------------------- Known bugs and current work -----------------------
-Test11 fails sometimes. (athena, huge features)
-
-ml_get errors: :%s/^\_s\+$//gc
-And: Insert mode in one window, long file, click in other window, short file.
-
-'scrolljump' negative used as a percentage, e.g. -50 is 50% of window height?
-
Spelling:
-- suggestion for "a an" includes "an an", which is marked bad. Check
- suggestions for not being a bad word (when split)?
+- Suggestions for "the the" includes "thee the" but not "the thee"?
- CTRL-X s doesn't consider 'spellcapcheck'.
-- Have spellbadword() return a list with bad word and reason it's bad?
- (rare/local/bad/caps)
+- Spellbadword() returns a list with bad word and reason it's bad.
+ This doesn't work when highlighting is the same for some mistakes.
- spellsuggest() needs a way to require a capital. A flag or context?
-- Underscore in REP items stands for space.
+
+Win32: Composing char appears on next position. (Tony Mechelynck)
+
+Support subdirectories in plugin directory? (Nikolai Weibull)
+
+Change 'include' so that it can match the file name when \zs and \ze are
+included. (docs already done tentatively).
ccomplete:
- How to use a popup menu?
Opposite of 'linespace': 'columnspace'.
7 At the hit-enter prompt scrolling now no longer works. Need to use the
keyboard to get around this. Pretend <CR> was hit when the user tries to
- scroll? Need to be able to get out of hit-enter prompt with the mouse
- anyway.
+ scroll?
7 Scrollbar width doesn't change when selecting other windows appearance.
Also background color of Toolbar and rectangle below vert. scrollbar.
7 "!start /min cmd" should run in a minimized window, instead of using
static long list_idx_of_item __ARGS((list_T *l, listitem_T *item));
static void list_append __ARGS((list_T *l, listitem_T *item));
static int list_append_tv __ARGS((list_T *l, typval_T *tv));
-static int list_append_string __ARGS((list_T *l, char_u *str));
+static int list_append_string __ARGS((list_T *l, char_u *str, int len));
+static int list_append_number __ARGS((list_T *l, varnumber_T n));
static int list_insert_tv __ARGS((list_T *l, typval_T *tv, listitem_T *item));
static int list_extend __ARGS((list_T *l1, list_T *l2, listitem_T *bef));
static int list_concat __ARGS((list_T *l1, list_T *l2, typval_T *tv));
char_u *op;
{
int cc;
- listitem_T *ni;
listitem_T *ri;
dictitem_T *di;
if (lp->ll_li->li_next == NULL)
{
/* Need to add an empty item. */
- ni = listitem_alloc();
- if (ni == NULL)
+ if (list_append_number(lp->ll_list, 0) == FAIL)
{
ri = NULL;
break;
}
- ni->li_tv.v_type = VAR_NUMBER;
- ni->li_tv.v_lock = 0;
- ni->li_tv.vval.v_number = 0;
- list_append(lp->ll_list, ni);
}
lp->ll_li = lp->ll_li->li_next;
++lp->ll_n1;
* Handle zero level expression.
* This calls eval1() and handles error message and nextcmd.
* Put the result in "rettv" when returning OK and "evaluate" is TRUE.
+ * Note: "rettv.v_lock" is not set.
* Return OK or FAIL.
*/
static int
* "arg" must point to the first non-white of the expression.
* "arg" is advanced to the next non-white after the recognized expression.
*
+ * Note: "rettv.v_lock" is not set.
+ *
* Return OK or FAIL.
*/
static int
/*
* Make a copy of "str" and append it as an item to list "l".
+ * When "len" >= 0 use "str[len]".
* Returns FAIL when out of memory.
*/
static int
-list_append_string(l, str)
+list_append_string(l, str, len)
list_T *l;
char_u *str;
+ int len;
{
listitem_T *li = listitem_alloc();
list_append(l, li);
li->li_tv.v_type = VAR_STRING;
li->li_tv.v_lock = 0;
- if ((li->li_tv.vval.v_string = vim_strsave(str)) == NULL)
+ if ((li->li_tv.vval.v_string = len >= 0 ? vim_strnsave(str, len)
+ : vim_strsave(str)) == NULL)
return FAIL;
return OK;
}
+/*
+ * Append "n" to list "l".
+ * Returns FAIL when out of memory.
+ */
+ static int
+list_append_number(l, n)
+ list_T *l;
+ varnumber_T n;
+{
+ listitem_T *li;
+
+ li = listitem_alloc();
+ if (li == NULL)
+ return FAIL;
+ li->li_tv.v_type = VAR_NUMBER;
+ li->li_tv.v_lock = 0;
+ li->li_tv.vval.v_number = n;
+ list_append(l, li);
+ return OK;
+}
+
/*
* Insert typval_T "tv" in list "l" before "item".
* If "item" is NULL append at the end.
{"simplify", 1, 1, f_simplify},
{"sort", 1, 2, f_sort},
{"soundfold", 1, 1, f_soundfold},
- {"spellbadword", 0, 0, f_spellbadword},
+ {"spellbadword", 0, 1, f_spellbadword},
{"spellsuggest", 1, 2, f_spellsuggest},
{"split", 1, 3, f_split},
#ifdef HAVE_STRFTIME
{
/* map(): replace the list item value */
clear_tv(tv);
+ rettv.v_lock = 0;
*tv = rettv;
}
else
if (end > buf->b_ml.ml_line_count)
end = buf->b_ml.ml_line_count;
while (start <= end)
- if (list_append_string(l, ml_get_buf(buf, start++, FALSE)) == FAIL)
+ if (list_append_string(l, ml_get_buf(buf, start++, FALSE), -1)
+ == FAIL)
break;
}
}
defstr = get_tv_string_buf_chk(&argvars[1], buf);
if (defstr != NULL)
stuffReadbuffSpec(defstr);
- }
- if (argvars[2].v_type != VAR_UNKNOWN)
- {
- char_u *xp_name;
- int xp_namelen;
- long argt;
+ if (argvars[2].v_type != VAR_UNKNOWN)
+ {
+ char_u *xp_name;
+ int xp_namelen;
+ long argt;
- rettv->vval.v_string = NULL;
+ rettv->vval.v_string = NULL;
- xp_name = get_tv_string_buf_chk(&argvars[2], buf);
- if (xp_name == NULL)
- return;
+ xp_name = get_tv_string_buf_chk(&argvars[2], buf);
+ if (xp_name == NULL)
+ return;
- xp_namelen = STRLEN(xp_name);
+ xp_namelen = STRLEN(xp_name);
- if (parse_compl_arg(xp_name, xp_namelen, &xp_type, &argt, &xp_arg)
- == FAIL)
- return;
+ if (parse_compl_arg(xp_name, xp_namelen, &xp_type, &argt,
+ &xp_arg) == FAIL)
+ return;
+ }
}
if (defstr != NULL)
{
if (regmatch.endp[i] == NULL)
break;
- li = listitem_alloc();
- if (li == NULL)
+ if (list_append_string(rettv->vval.v_list,
+ regmatch.startp[i],
+ (int)(regmatch.endp[i] - regmatch.startp[i]))
+ == FAIL)
break;
- li->li_tv.v_type = VAR_STRING;
- li->li_tv.v_lock = 0;
- li->li_tv.vval.v_string = vim_strnsave(regmatch.startp[i],
- (int)(regmatch.endp[i] - regmatch.startp[i]));
- list_append(rettv->vval.v_list, li);
}
}
else if (type == 2)
long stride = 1;
long i;
list_T *l;
- listitem_T *li;
int error = FALSE;
start = get_tv_number_chk(&argvars[0], &error);
++l->lv_refcount;
for (i = start; stride > 0 ? i <= end : i >= end; i += stride)
- {
- li = listitem_alloc();
- if (li == NULL)
+ if (list_append_number(l, (varnumber_T)i) == FAIL)
break;
- li->li_tv.v_type = VAR_NUMBER;
- li->li_tv.v_lock = 0;
- li->li_tv.vval.v_number = i;
- list_append(l, li);
- }
}
}
}
typval_T *argvars;
typval_T *rettv;
{
+ char_u *word = (char_u *)"";
+#ifdef FEAT_SYN_HL
int len;
+ int attr = 0;
+ list_T *l;
+#endif
- rettv->vval.v_string = NULL;
- rettv->v_type = VAR_STRING;
+ l = list_alloc();
+ if (l == NULL)
+ return;
+ rettv->v_type = VAR_LIST;
+ rettv->vval.v_list = l;
+ ++l->lv_refcount;
#ifdef FEAT_SYN_HL
- /* Find the start and length of the badly spelled word. */
- len = spell_move_to(curwin, FORWARD, TRUE, TRUE, NULL);
- if (len != 0)
- rettv->vval.v_string = vim_strnsave(ml_get_cursor(), len);
+ if (argvars[0].v_type == VAR_UNKNOWN)
+ {
+ /* Find the start and length of the badly spelled word. */
+ len = spell_move_to(curwin, FORWARD, TRUE, TRUE, &attr);
+ if (len != 0)
+ word = ml_get_cursor();
+ }
+ else if (curwin->w_p_spell && *curbuf->b_p_spl != NUL)
+ {
+ char_u *str = get_tv_string_chk(&argvars[0]);
+ int capcol = -1;
+
+ if (str != NULL)
+ {
+ /* Check the argument for spelling. */
+ while (*str != NUL)
+ {
+ len = spell_check(curwin, str, &attr, &capcol);
+ if (attr != 0)
+ {
+ word = str;
+ break;
+ }
+ str += len;
+ }
+ }
+ }
#endif
+
+ list_append_string(l, word, len);
+ list_append_string(l, (char_u *)(
+ attr == highlight_attr[HLF_SPB] ? "bad" :
+ attr == highlight_attr[HLF_SPR] ? "rare" :
+ attr == highlight_attr[HLF_SPL] ? "local" :
+ attr == highlight_attr[HLF_SPC] ? "caps" :
+ ""), -1);
}
/*
char_u patbuf[NUMBUFLEN];
char_u *save_cpo;
int match;
- listitem_T *ni;
list_T *l;
colnr_T col = 0;
int keepempty = FALSE;
if (keepempty || end > str || (l->lv_len > 0 && *str != NUL
&& match && end < regmatch.endp[0]))
{
- ni = listitem_alloc();
- if (ni == NULL)
+ if (list_append_string(l, str, (int)(end - str)) == FAIL)
break;
- ni->li_tv.v_type = VAR_STRING;
- ni->li_tv.v_lock = 0;
- ni->li_tv.vval.v_string = vim_strnsave(str, end - str);
- list_append(l, ni);
}
if (!match)
break;
get_tagfname(TRUE, NULL);
for (;;)
if (get_tagfname(FALSE, fname) == FAIL
- || list_append_string(l, fname) == FAIL)
+ || list_append_string(l, fname, -1) == FAIL)
break;
}
normal 0f:]s
let prevbad = ''
while 1
- let bad = spellbadword()
+ let [bad, a] = spellbadword()
if bad == '' || bad == prevbad || bad == 'badend'
break
endif
:mkspell! Xtest.latin1.add.spl Xtest.latin1.add
:set spellfile=Xtest.latin1.add
/^test2:
-]s:let str = spellbadword()
+]s:let [str, a] = spellbadword()
:$put =str
:set spl=Xtest_us.latin1.spl
/^test2:
-]smm:let str = spellbadword()
+]smm:let [str, a] = spellbadword()
:$put =str
-`m]s:let str = spellbadword()
+`m]s:let [str, a] = spellbadword()
:$put =str
:set spl=Xtest_gb.latin1.spl
/^test2:
-]smm:let str = spellbadword()
+]smm:let [str, a] = spellbadword()
:$put =str
-`m]s:let str = spellbadword()
+`m]s:let [str, a] = spellbadword()
:$put =str
:set spl=Xtest_nz.latin1.spl
/^test2:
-]smm:let str = spellbadword()
+]smm:let [str, a] = spellbadword()
:$put =str
-`m]s:let str = spellbadword()
+`m]s:let [str, a] = spellbadword()
:$put =str
:set spl=Xtest_ca.latin1.spl
/^test2:
-]smm:let str = spellbadword()
+]smm:let [str, a] = spellbadword()
:$put =str
-`m]s:let str = spellbadword()
+`m]s:let [str, a] = spellbadword()
:$put =str
:"
:" Postponed prefixes
projects / vim / commitdiff