515 	struct mem_block *memBase;  in add_node()  local
518 	memBase = list->listMemBase;  in add_node()
519 	if (memBase != NULL)  in add_node()
520 		index = memBase->index;  in add_node()
526 	if (memBase == NULL || index >= NODE_CHUNK) {  in add_node()
528 		memBase = mmalloc(sizeof(struct mem_block));  in add_node()
529 		if (memBase == NULL) {  in add_node()
533 		memBase->next = list->listMemBase;  in add_node()
536 		putLabeledWord("add_node: alloced a new membase at ", *memBase);  in add_node()
541 	b = &memBase->nodes[index];  in add_node()
544 	memBase->index = index;  in add_node()
545 	list->listMemBase = memBase;  in add_node()