# include	"form.h"

MMfree(frame)
register struct MM_form		**frame;
{
	register struct MM_form		*form;
	register struct MM_form		*f;

	if (form = *frame)
	{
		do
		{
			f = form->f_next;
			free(form);
		} while ((form = f) != *frame);

		*frame = (struct MM_form *) 0;
	}

	return (1);
}