******** fig3.49 **********

	void
	make_null( STACK S )
	{
		S->top_of_stack = EMPTY_TOS;
	}