oldlist.cpp File Reference

#include "oldlist.h"
#include <cstdio>
#include <cstring>
#include "errcode.h"
#include "structures.h"

Go to the source code of this file.

Macros
#define	add_on(l, x)   l = push(l, first_node(x))
#define	next_one(l)   l = list_rest(l)

Functions
int	count (LIST var_list)
LIST	delete_d (LIST list, void *key, int_compare is_equal)
LIST	delete_d (LIST list, void *key, TessResultCallback2< int, void *, void *> *is_equal)
LIST	destroy (LIST list)
void	destroy_nodes (LIST list, void_dest destructor)
void	insert (LIST list, void *node)
int	is_same (void *item1, void *item2)
LIST	join (LIST list1, LIST list2)
LIST	last (LIST var_list)
void *	nth_cell (LIST var_list, int item_num)
LIST	pop (LIST list)
LIST	push (LIST list, void *element)
LIST	push_last (LIST list, void *item)
LIST	reverse (LIST list)
LIST	reverse_d (LIST list)
LIST	s_adjoin (LIST var_list, void *variable, int_compare compare)
LIST	search (LIST list, void *key, int_compare is_equal)
LIST	search (LIST list, void *key, TessResultCallback2< int, void *, void *> *is_equal)

Macro Definition Documentation

add_on

#define add_on	(		l,
			x
	)		l = push(l, first_node(x))

Definition at line 87 of file oldlist.cpp.

next_one

#define next_one

(

l

)

l = list_rest(l)

Definition at line 88 of file oldlist.cpp.

Function Documentation

count()

int count

(

LIST

var_list

)

Definition at line 98 of file oldlist.cpp.

                         {
  int temp = 0;

  iterate(var_list) temp += 1;
  return (temp);
}

delete_d() [1/2]

LIST delete_d	(	LIST	list,
		void *	key,
		int_compare	is_equal
	)

Definition at line 114 of file oldlist.cpp.

                                                          {
  LIST result = NIL_LIST;
  LIST last_one = NIL_LIST;

  if (is_equal == nullptr) is_equal = is_same;

  while (list != NIL_LIST) {
    if (!(*is_equal)(first_node(list), key)) {
      if (last_one == NIL_LIST) {
        last_one = list;
        list = list_rest(list);
        result = last_one;
        set_rest(last_one, NIL_LIST);
      } else {
        set_rest(last_one, list);
        last_one = list;
        list = list_rest(list);
        set_rest(last_one, NIL_LIST);
      }
    } else {
      list = pop(list);
    }
  }
  return (result);
}

delete_d() [2/2]

LIST delete_d	(	LIST	list,
		void *	key,
		TessResultCallback2< int, void *, void *> *	is_equal
	)

Definition at line 140 of file oldlist.cpp.

                                                                  {
  LIST result = NIL_LIST;
  LIST last_one = NIL_LIST;

  while (list != NIL_LIST) {
    if (!(*is_equal).Run(first_node(list), key)) {
      if (last_one == NIL_LIST) {
        last_one = list;
        list = list_rest(list);
        result = last_one;
        set_rest(last_one, NIL_LIST);
      } else {
        set_rest(last_one, list);
        last_one = list;
        list = list_rest(list);
        set_rest(last_one, NIL_LIST);
      }
    } else {
      list = pop(list);
    }
  }
  return (result);
}

destroy()

LIST destroy

(

LIST

list

)

Definition at line 170 of file oldlist.cpp.

                        {
  LIST next;

  while (list != NIL_LIST) {
    next = list_rest(list);
    free_cell(list);
    list = next;
  }
  return (NIL_LIST);
}

destroy_nodes()

void destroy_nodes	(	LIST	list,
		void_dest	destructor
	)

Definition at line 186 of file oldlist.cpp.

                                                    {
  ASSERT_HOST(destructor != nullptr);

  while (list != NIL_LIST) {
    if (first_node(list) != nullptr) (*destructor)(first_node(list));
    list = pop(list);
  }
}

insert()

void insert	(	LIST	list,
		void *	node
	)

Definition at line 201 of file oldlist.cpp.

                                   {
  LIST element;

  if (list != NIL_LIST) {
    element = push(NIL_LIST, node);
    set_rest(element, list_rest(list));
    set_rest(list, element);
    node = first_node(list);
    list->node = first_node(list_rest(list));
    list->next->node = (LIST)node;
  }
}

is_same()

int is_same	(	void *	item1,
		void *	item2
	)

Definition at line 220 of file oldlist.cpp.

                                      {
  return strcmp((char *)item1, (char *)item2) == 0 ? 1 : 0;
}

join()

LIST join	(	LIST	list1,
		LIST	list2
	)

Definition at line 231 of file oldlist.cpp.

                                  {
  if (list1 == NIL_LIST) return (list2);
  set_rest(last(list1), list2);
  return (list1);
}

last()

LIST last

(

LIST

var_list

)

Definition at line 242 of file oldlist.cpp.

                         {
  while (list_rest(var_list) != NIL_LIST) var_list = list_rest(var_list);
  return (var_list);
}

nth_cell()

void* nth_cell	(	LIST	var_list,
		int	item_num
	)

Definition at line 252 of file oldlist.cpp.

                                            {
  int x = 0;
  iterate(var_list) {
    if (x++ == item_num) return (var_list);
  }
  return (var_list);
}

pop()

LIST pop

(

LIST

list

)

Definition at line 266 of file oldlist.cpp.

                    {
  LIST temp;

  temp = list_rest(list);

  if (list != NIL_LIST) {
    free_cell(list);
  }
  return (temp);
}

push()

LIST push	(	LIST	list,
		void *	element
	)

Definition at line 283 of file oldlist.cpp.

                                    {
  LIST t;

  t = new_cell();
  t->node = (LIST)element;
  set_rest(t, list);
  return (t);
}

push_last()

LIST push_last	(	LIST	list,
		void *	item
	)

Definition at line 297 of file oldlist.cpp.

                                      {
  LIST t;

  if (list != NIL_LIST) {
    t = last(list);
    t->next = push(NIL_LIST, item);
    return (list);
  } else
    return (push(NIL_LIST, item));
}

reverse()

LIST reverse

(

LIST

list

)

Definition at line 314 of file oldlist.cpp.

                        {
  LIST newlist = NIL_LIST;

  iterate(list) copy_first(list, newlist);
  return (newlist);
}

reverse_d()

LIST reverse_d

(

LIST

list

)

Definition at line 327 of file oldlist.cpp.

                          {
  LIST result = reverse(list);
  destroy(list);
  return (result);
}

s_adjoin()

LIST s_adjoin	(	LIST	var_list,
		void *	variable,
		int_compare	compare
	)

Definition at line 339 of file oldlist.cpp.

                                                                  {
  LIST l;
  int result;

  if (compare == nullptr) compare = (int_compare)strcmp;

  l = var_list;
  iterate(l) {
    result = (*compare)(variable, first_node(l));
    if (result == 0)
      return (var_list);
    else if (result < 0) {
      insert(l, variable);
      return (var_list);
    }
  }
  return (push_last(var_list, variable));
}

search() [1/2]

LIST search	(	LIST	list,
		void *	key,
		int_compare	is_equal
	)

Definition at line 366 of file oldlist.cpp.

                                                        {
  if (is_equal == nullptr) is_equal = is_same;

  iterate(list) if ((*is_equal)(first_node(list), key)) return (list);
  return (NIL_LIST);
}

search() [2/2]

LIST search	(	LIST	list,
		void *	key,
		TessResultCallback2< int, void *, void *> *	is_equal
	)

Definition at line 373 of file oldlist.cpp.

                                                                {
  iterate(list) if ((*is_equal).Run(first_node(list), key)) return (list);
  return (NIL_LIST);
}