/***************************************************************************
 *                                                                         *
 *   SKPWHT.C                                                              *
 *                                                                         *
 *   Copyright (c) 1987-1997 Galacticomm, Inc.    All Rights Reserved.     *
 *                                                                         *
 *   This is the GCOMM.LIB routine for skipping over spaces.               *
 *                                                                         *
 *                                            - R. Stein   2/5/92          *
 *                                             -C. Dunn 3/26/96            *
 *                                                                         *
 ***************************************************************************/

#include "gcomm.h"

#define FILREV "$Revision: 5 $"

CHAR *                             /*   returns ptr to word                */
skpwht(                            /* skip spaces                          */
const CHAR *cp)                    /*   buffer to work on                  */
{
     while (*cp == ' ') {
          cp++;
     }
     return((CHAR *)cp);
}

CHAR *                             /*   return pointer to modified string  */
skptwht(                           /* skip true preceding whitespace       */
const CHAR *string)                /*   string to process                  */
{
     while (isspace(*string)) {
          string++;
     }
     return((CHAR *)string);
}
