mirror of
https://github.com/neovim/neovim.git
synced 2025-09-18 17:28:23 +00:00
*: Start hiding list implementation
Most of files, except for eval.c and eval/* were only processed by perl.
This commit is contained in:
@@ -66,7 +66,7 @@ listitem_T *tv_list_item_alloc(void)
|
||||
void tv_list_item_free(listitem_T *const item)
|
||||
FUNC_ATTR_NONNULL_ALL
|
||||
{
|
||||
tv_clear(&item->li_tv);
|
||||
tv_clear(TV_LIST_ITEM_TV(item));
|
||||
xfree(item);
|
||||
}
|
||||
|
||||
@@ -326,7 +326,7 @@ void tv_list_append_tv(list_T *const l, typval_T *const tv)
|
||||
FUNC_ATTR_NONNULL_ALL
|
||||
{
|
||||
listitem_T *const li = tv_list_item_alloc();
|
||||
tv_copy(tv, &li->li_tv);
|
||||
tv_copy(tv, TV_LIST_ITEM_TV(li));
|
||||
tv_list_append(l, li);
|
||||
}
|
||||
|
||||
@@ -339,12 +339,12 @@ void tv_list_append_list(list_T *const list, list_T *const itemlist)
|
||||
{
|
||||
listitem_T *const li = tv_list_item_alloc();
|
||||
|
||||
li->li_tv.v_type = VAR_LIST;
|
||||
li->li_tv.v_lock = VAR_UNLOCKED;
|
||||
li->li_tv.vval.v_list = itemlist;
|
||||
TV_LIST_ITEM_TV(li)->v_type = VAR_LIST;
|
||||
TV_LIST_ITEM_TV(li)->v_lock = VAR_UNLOCKED;
|
||||
TV_LIST_ITEM_TV(li)->vval.v_list = itemlist;
|
||||
tv_list_append(list, li);
|
||||
if (itemlist != NULL) {
|
||||
itemlist->lv_refcount++;
|
||||
tv_list_ref(itemlist);
|
||||
}
|
||||
}
|
||||
|
||||
@@ -357,9 +357,9 @@ void tv_list_append_dict(list_T *const list, dict_T *const dict)
|
||||
{
|
||||
listitem_T *const li = tv_list_item_alloc();
|
||||
|
||||
li->li_tv.v_type = VAR_DICT;
|
||||
li->li_tv.v_lock = VAR_UNLOCKED;
|
||||
li->li_tv.vval.v_dict = dict;
|
||||
TV_LIST_ITEM_TV(li)->v_type = VAR_DICT;
|
||||
TV_LIST_ITEM_TV(li)->v_lock = VAR_UNLOCKED;
|
||||
TV_LIST_ITEM_TV(li)->vval.v_dict = dict;
|
||||
tv_list_append(list, li);
|
||||
if (dict != NULL) {
|
||||
dict->dv_refcount++;
|
||||
@@ -399,9 +399,9 @@ void tv_list_append_allocated_string(list_T *const l, char *const str)
|
||||
listitem_T *const li = tv_list_item_alloc();
|
||||
|
||||
tv_list_append(l, li);
|
||||
li->li_tv.v_type = VAR_STRING;
|
||||
li->li_tv.v_lock = VAR_UNLOCKED;
|
||||
li->li_tv.vval.v_string = (char_u *)str;
|
||||
TV_LIST_ITEM_TV(li)->v_type = VAR_STRING;
|
||||
TV_LIST_ITEM_TV(li)->v_lock = VAR_UNLOCKED;
|
||||
TV_LIST_ITEM_TV(li)->vval.v_string = (char_u *)str;
|
||||
}
|
||||
|
||||
/// Append number to the list
|
||||
@@ -412,9 +412,9 @@ void tv_list_append_allocated_string(list_T *const l, char *const str)
|
||||
void tv_list_append_number(list_T *const l, const varnumber_T n)
|
||||
{
|
||||
listitem_T *const li = tv_list_item_alloc();
|
||||
li->li_tv.v_type = VAR_NUMBER;
|
||||
li->li_tv.v_lock = VAR_UNLOCKED;
|
||||
li->li_tv.vval.v_number = n;
|
||||
TV_LIST_ITEM_TV(li)->v_type = VAR_NUMBER;
|
||||
TV_LIST_ITEM_TV(li)->v_lock = VAR_UNLOCKED;
|
||||
TV_LIST_ITEM_TV(li)->vval.v_number = n;
|
||||
tv_list_append(l, li);
|
||||
}
|
||||
|
||||
@@ -439,33 +439,32 @@ list_T *tv_list_copy(const vimconv_T *const conv, list_T *const orig,
|
||||
}
|
||||
|
||||
list_T *copy = tv_list_alloc();
|
||||
tv_list_ref(copy);
|
||||
if (copyID != 0) {
|
||||
// Do this before adding the items, because one of the items may
|
||||
// refer back to this list.
|
||||
orig->lv_copyID = copyID;
|
||||
orig->lv_copylist = copy;
|
||||
}
|
||||
listitem_T *item;
|
||||
for (item = orig->lv_first; item != NULL && !got_int;
|
||||
item = item->li_next) {
|
||||
TV_LIST_ITER(orig, item, {
|
||||
listitem_T *const ni = tv_list_item_alloc();
|
||||
if (deep) {
|
||||
if (var_item_copy(conv, &item->li_tv, &ni->li_tv, deep, copyID) == FAIL) {
|
||||
if (var_item_copy(conv, TV_LIST_ITEM_TV(item), TV_LIST_ITEM_TV(ni),
|
||||
deep, copyID) == FAIL) {
|
||||
xfree(ni);
|
||||
break;
|
||||
goto tv_list_copy_error;
|
||||
}
|
||||
} else {
|
||||
tv_copy(&item->li_tv, &ni->li_tv);
|
||||
tv_copy(TV_LIST_ITEM_TV(item), TV_LIST_ITEM_TV(ni));
|
||||
}
|
||||
tv_list_append(copy, ni);
|
||||
}
|
||||
copy->lv_refcount++;
|
||||
if (item != NULL) {
|
||||
tv_list_unref(copy);
|
||||
copy = NULL;
|
||||
}
|
||||
});
|
||||
|
||||
return copy;
|
||||
|
||||
tv_list_copy_error:
|
||||
tv_list_unref(copy);
|
||||
return NULL;
|
||||
}
|
||||
|
||||
/// Extend first list with the second
|
||||
@@ -475,17 +474,17 @@ list_T *tv_list_copy(const vimconv_T *const conv, list_T *const orig,
|
||||
/// @param[in] bef If not NULL, extends before this item.
|
||||
void tv_list_extend(list_T *const l1, list_T *const l2,
|
||||
listitem_T *const bef)
|
||||
FUNC_ATTR_NONNULL_ARG(1, 2)
|
||||
FUNC_ATTR_NONNULL_ARG(1)
|
||||
{
|
||||
int todo = l2->lv_len;
|
||||
int todo = tv_list_len(l2);
|
||||
listitem_T *const befbef = (bef == NULL ? NULL : bef->li_prev);
|
||||
listitem_T *const saved_next = (befbef == NULL ? NULL : befbef->li_next);
|
||||
// We also quit the loop when we have inserted the original item count of
|
||||
// the list, avoid a hang when we extend a list with itself.
|
||||
for (listitem_T *item = l2->lv_first
|
||||
; item != NULL && --todo >= 0
|
||||
for (listitem_T *item = tv_list_first(l2)
|
||||
; item != NULL && todo--
|
||||
; item = (item == befbef ? saved_next : item->li_next)) {
|
||||
tv_list_insert_tv(l1, &item->li_tv, bef);
|
||||
tv_list_insert_tv(l1, TV_LIST_ITEM_TV(item), bef);
|
||||
}
|
||||
}
|
||||
|
||||
@@ -540,13 +539,12 @@ static int list_join_inner(garray_T *const gap, list_T *const l,
|
||||
{
|
||||
size_t sumlen = 0;
|
||||
bool first = true;
|
||||
listitem_T *item;
|
||||
|
||||
// Stringify each item in the list.
|
||||
for (item = l->lv_first; item != NULL && !got_int; item = item->li_next) {
|
||||
TV_LIST_ITER(l, item, {
|
||||
char *s;
|
||||
size_t len;
|
||||
s = encode_tv2echo(&item->li_tv, &len);
|
||||
s = encode_tv2echo(TV_LIST_ITEM_TV(item), &len);
|
||||
if (s == NULL) {
|
||||
return FAIL;
|
||||
}
|
||||
@@ -557,7 +555,7 @@ static int list_join_inner(garray_T *const gap, list_T *const l,
|
||||
p->tofree = p->s = (char_u *)s;
|
||||
|
||||
line_breakcheck();
|
||||
}
|
||||
});
|
||||
|
||||
// Allocate result buffer with its total size, avoid re-allocation and
|
||||
// multiple copy operations. Add 2 for a tailing ']' and NUL.
|
||||
@@ -591,16 +589,16 @@ static int list_join_inner(garray_T *const gap, list_T *const l,
|
||||
///
|
||||
/// @return OK in case of success, FAIL otherwise.
|
||||
int tv_list_join(garray_T *const gap, list_T *const l, const char *const sep)
|
||||
FUNC_ATTR_NONNULL_ALL
|
||||
FUNC_ATTR_NONNULL_ARG(1)
|
||||
{
|
||||
if (l->lv_len < 1) {
|
||||
if (!tv_list_len(l)) {
|
||||
return OK;
|
||||
}
|
||||
|
||||
garray_T join_ga;
|
||||
int retval;
|
||||
|
||||
ga_init(&join_ga, (int)sizeof(Join), l->lv_len);
|
||||
ga_init(&join_ga, (int)sizeof(Join), tv_list_len(l));
|
||||
retval = list_join_inner(gap, l, sep, &join_ga);
|
||||
|
||||
#define FREE_JOIN_TOFREE(join) xfree((join)->tofree)
|
||||
@@ -632,11 +630,13 @@ bool tv_list_equal(list_T *const l1, list_T *const l2, const bool ic,
|
||||
return false;
|
||||
}
|
||||
|
||||
listitem_T *item1 = l1->lv_first;
|
||||
listitem_T *item2 = l2->lv_first;
|
||||
listitem_T *item1 = tv_list_first(l1);
|
||||
listitem_T *item2 = tv_list_first(l2);
|
||||
for (; item1 != NULL && item2 != NULL
|
||||
; item1 = item1->li_next, item2 = item2->li_next) {
|
||||
if (!tv_equal(&item1->li_tv, &item2->li_tv, ic, recursive)) {
|
||||
; item1 = TV_LIST_ITEM_NEXT(l1, item1),
|
||||
item2 = TV_LIST_ITEM_NEXT(n2, item2)) {
|
||||
if (!tv_equal(TV_LIST_ITEM_TV(item1), TV_LIST_ITEM_TV(item2), ic,
|
||||
recursive)) {
|
||||
return false;
|
||||
}
|
||||
}
|
||||
@@ -662,13 +662,8 @@ listitem_T *tv_list_find(list_T *const l, int n)
|
||||
return NULL;
|
||||
}
|
||||
|
||||
// Negative index is relative to the end.
|
||||
if (n < 0) {
|
||||
n = l->lv_len + n;
|
||||
}
|
||||
|
||||
// Check for index out of range.
|
||||
if (n < 0 || n >= l->lv_len) {
|
||||
n = tv_list_uidx(l, n);
|
||||
if (n == -1) {
|
||||
return NULL;
|
||||
}
|
||||
|
||||
@@ -740,7 +735,7 @@ varnumber_T tv_list_find_nr(list_T *const l, const int n, bool *const ret_error)
|
||||
}
|
||||
return -1;
|
||||
}
|
||||
return tv_get_number_chk(&li->li_tv, ret_error);
|
||||
return tv_get_number_chk(TV_LIST_ITEM_TV(li), ret_error);
|
||||
}
|
||||
|
||||
/// Get list item l[n] as a string
|
||||
@@ -757,7 +752,7 @@ const char *tv_list_find_str(list_T *const l, const int n)
|
||||
emsgf(_(e_listidx), (int64_t)n);
|
||||
return NULL;
|
||||
}
|
||||
return tv_get_string(&li->li_tv);
|
||||
return tv_get_string(TV_LIST_ITEM_TV(li));
|
||||
}
|
||||
|
||||
/// Locate item in a list and return its index
|
||||
@@ -772,15 +767,14 @@ long tv_list_idx_of_item(const list_T *const l, const listitem_T *const item)
|
||||
if (l == NULL) {
|
||||
return -1;
|
||||
}
|
||||
long idx = 0;
|
||||
const listitem_T *li;
|
||||
for (li = l->lv_first; li != NULL && li != item; li = li->li_next) {
|
||||
int idx = 0;
|
||||
TV_LIST_ITER_CONST(l, li, {
|
||||
if (li == item) {
|
||||
return idx;
|
||||
}
|
||||
idx++;
|
||||
}
|
||||
if (li == NULL) {
|
||||
return -1;
|
||||
}
|
||||
return idx;
|
||||
});
|
||||
return -1;
|
||||
}
|
||||
|
||||
//{{{1 Dictionaries
|
||||
@@ -1339,7 +1333,7 @@ int tv_dict_add_list(dict_T *const d, const char *const key,
|
||||
item->di_tv.v_lock = VAR_UNLOCKED;
|
||||
item->di_tv.v_type = VAR_LIST;
|
||||
item->di_tv.vval.v_list = list;
|
||||
list->lv_refcount++;
|
||||
tv_list_ref(list);
|
||||
if (tv_dict_add(d, item) == FAIL) {
|
||||
tv_dict_item_free(item);
|
||||
return FAIL;
|
||||
@@ -1677,7 +1671,7 @@ list_T *tv_list_alloc_ret(typval_T *const ret_tv)
|
||||
ret_tv->vval.v_list = l;
|
||||
ret_tv->v_type = VAR_LIST;
|
||||
ret_tv->v_lock = VAR_UNLOCKED;
|
||||
l->lv_refcount++;
|
||||
tv_list_ref(l);
|
||||
return l;
|
||||
}
|
||||
|
||||
@@ -2027,7 +2021,7 @@ void tv_copy(typval_T *const from, typval_T *const to)
|
||||
}
|
||||
case VAR_LIST: {
|
||||
if (from->vval.v_list != NULL) {
|
||||
to->vval.v_list->lv_refcount++;
|
||||
tv_list_ref(to->vval.v_list);
|
||||
}
|
||||
break;
|
||||
}
|
||||
@@ -2084,9 +2078,9 @@ void tv_item_lock(typval_T *const tv, const int deep, const bool lock)
|
||||
CHANGE_LOCK(lock, l->lv_lock);
|
||||
if (deep < 0 || deep > 1) {
|
||||
// Recursive: lock/unlock the items the List contains.
|
||||
for (listitem_T *li = l->lv_first; li != NULL; li = li->li_next) {
|
||||
tv_item_lock(&li->li_tv, deep - 1, lock);
|
||||
}
|
||||
TV_LIST_ITER(l, li, {
|
||||
tv_item_lock(TV_LIST_ITEM_TV(li), deep - 1, lock);
|
||||
});
|
||||
}
|
||||
}
|
||||
break;
|
||||
@@ -2122,6 +2116,8 @@ void tv_item_lock(typval_T *const tv, const int deep, const bool lock)
|
||||
|
||||
/// Check whether VimL value is locked itself or refers to a locked container
|
||||
///
|
||||
/// @warning Fixed container is not the same as locked.
|
||||
///
|
||||
/// @param[in] tv Value to check.
|
||||
///
|
||||
/// @return True if value is locked, false otherwise.
|
||||
@@ -2130,8 +2126,7 @@ bool tv_islocked(const typval_T *const tv)
|
||||
{
|
||||
return ((tv->v_lock == VAR_LOCKED)
|
||||
|| (tv->v_type == VAR_LIST
|
||||
&& tv->vval.v_list != NULL
|
||||
&& (tv->vval.v_list->lv_lock == VAR_LOCKED))
|
||||
&& (tv_list_locked(tv->vval.v_list) == VAR_LOCKED))
|
||||
|| (tv->v_type == VAR_DICT
|
||||
&& tv->vval.v_dict != NULL
|
||||
&& (tv->vval.v_dict->dv_lock == VAR_LOCKED)));
|
||||
|
Reference in New Issue
Block a user