14 struct LispNode {  struct
16 	LispNode* cdr;  argument
19 	inline LispNode(contents* value)  in LispNode()  function
23 	inline LispNode(contents* value, LispNode* next)  in LispNode()  function
27 	inline LispNode(LispNode* prev, contents* value)  in LispNode()  function
34 	LispNode<contents> *first;
45 	inline LispList(LispNode<contents>* _first)  in LispList()
68 		for (LispNode<contents>* node = first; node; node = node->cdr)  in is_present()
79 		for (LispNode<contents>* node = first; node; node = node->cdr)  in count()
87 	inline void add_head(LispNode<contents>* new_element)  in add_head()
95 	inline void add(LispNode<contents>* new_element)  in add()
101 	inline void add_tail(LispNode<contents>* new_element)  in add_tail()
103 		LispNode<contents>** pred = &first;  in add_tail()
117 		first = new LispNode<contents>(new_element, first);  in add_head_new()
130 		LispNode< contents >** pred = &first;  in add_tail_new()
134 		*pred = new LispNode< contents >(new_element);  in add_tail_new()
176 	inline LispNode<contents>* rem_head ()  in rem_head()
178 		LispNode<contents>* n = first;  in rem_head()
189 	inline LispNode<contents>* remove ()  in remove()
196 	inline void remove (LispNode<contents>* node)  in remove()
198 		for (LispNode<contents> **pp = &first; *pp; pp = &(*pp)->cdr)  in remove()
209 		LispNode<contents>** pp = &first;  in rem_del()
212 				LispNode<contents> *o = *pp;  in rem_del()
225 			LispNode<contents>* old = first;  in rem_del_all()
263 	      for (LispNode<contents> *node = first; node; node = node->cdr)
323 		for (LispNode<contents>* n = other.first; n; n = n->cdr)  in add_new()
330 		for (LispNode<contents>* n = other.first; n; n = n->cdr)  in add_new_once()
339 		for (LispNode<contents>* n = other.first; n; n = n->cdr)  in rem_del()