/* int	IsDecimalZero(pSrc1);
 *
 * ARGUMENT
 *	DEC	*pSrc1;
 *
 * DESCRIPTION
 *	Decides	whether	pSrc1 is a zero.
 *
 * SIDE	EFFECTS
 *	None.
 *
 * RETURNS
 *	Returns	TRUE if	zero, else returns FALSE. Note that if a null
 *   pointer is	handed us, we return GM_NULLPOINTER.
 *
 * POSSIBLE ERROR CODES
 *
 *	GM_NULLPOINTER
 *
 * AUTHOR
 *  Andy Anderson   15-JAN-1987	 16:00
 *   Copyright (C) 1987-1990 Greenleaf Software	Inc.  All rights reserved.
 *
 * MODIFICATIONS
 *
 */

#include <stdio.h>
#include "gm.h"
#include "gmsystem.h"

int	IsDecimalZero(pSrc1)
DEC	*pSrc1;
{

	_MacStart(GM_DISZERO);
	_MacInVarI(pSrc1);

	/*  Then check for non-zero number */
	if(_MacIsDecZ(pSrc1))
		{_MacRet(TRUE);}
	else
		_MacRet(FALSE);
}