Function DeleteObjects

roomedit/source/objects.cpp:563–777

*/

void DeleteObjects (int objtype, SelPtr *list)
{
	SHORT n, objnum, i;
	SelPtr cur;

	MadeChanges = TRUE;
	switch (objtype)
	{
	case OBJ_THINGS:
		while (*list)
		{
			objnum = (*list)->objnum;
			if (kodEntrance == Things[objnum].type)
			{
//				DeleteEntrance(Things[objnum].when,Things[objnum].id);
			}
			/* delete the Thing */
			NumThings--;
			if (NumThings > 0)
			{
				for (n = objnum; n < NumThings; n++)
					Things[ n] = Things[ n + 1];
				Things = (TPtr)ResizeMemory (Things, NumThings * sizeof(Thing));
			}
			else
			{
				FreeMemory (Things);
				Things = NULL;
			}

			// Update objnum of selection list
			for (cur = (*list)->next; cur; cur = cur->next)
				if (cur->objnum > objnum)
					cur->objnum--;
			UnSelectObject( list, objnum);
		}
		break;

	case OBJ_VERTEXES:
		while (*list)
		{
			objnum = (*list)->objnum;
			// delete the LineDefs bound to this Vertex and
			// change the references
			for (n = 0; n < NumLineDefs; n++)
			{
				if (LineDefs[ n].start == objnum || LineDefs[ n].end == objnum)
					DeleteObject( OBJ_LINEDEFS, n--);
				else
				{
					if (LineDefs[ n].start >= objnum)
						LineDefs[ n].start--;
					if (LineDefs[ n].end >= objnum)
						LineDefs[ n].end--;

				}
			}