/***************************************************************************
 *                                                                         *
 *   ALLHEX.C                                                              *
 *                                                                         *
 *   Copyright (c) 1994-1997 Galacticomm, Inc.    All Rights Reserved.     *
 *                                                                         *
 *   This is the GCOMM.LIB routine for determining if a string is all      *
 *   hexadecimal digits or not.                                            *
 *                                                                         *
 *                                            - R. Stein   5/19/94         *
 *                                                                         *
 ***************************************************************************/

#include "gcomm.h"

#define FILREV "$Revision: 5 $"

GBOOL                              /*   returns TRUE=all hexidecimal digits*/
allhex(                            /* is string all hex digits             */
const CHAR *string)                /*   string to check                    */
{
     while (*string != '\0') {
          if (!isxdigit(*string)) {
               return(FALSE);
          }
          string++;
     }
     return(TRUE);
}
