nested types and deleting them.

Easy method: Create an additional field in your m type so that you can mark it for deletion.

Then after your code above just

For m = Each weapon
	If m\destroy = True Then Delete m
Next