******** fig3.48 **********

	int
	is_empty( STACK S )
	{
		return( S->top_of_stack == EMPTY_TOS );
	}