27 lines
511 B
C
27 lines
511 B
C
/*
|
|
** Originally published as part of the MicroFirm Function Library
|
|
**
|
|
** Copyright 1986, S.E. Margison
|
|
** Copyright 1989, Robert B.Stout
|
|
**
|
|
** Subset version released to the public domain, 1991
|
|
**
|
|
** remove leading whitespace from a string
|
|
*/
|
|
|
|
#include <ctype.h>
|
|
#include <string.h>
|
|
|
|
#define NUL '\0'
|
|
|
|
char *rmlead(char *str)
|
|
{
|
|
|
|
char *obuf;
|
|
|
|
|
|
for (obuf = str; obuf && *obuf && isspace(*obuf); ++obuf)
|
|
|
|
;
|
|
|
|
if (str != obuf)
|
|
|
|
strcpy(str, obuf);
|
|
|
|
return str;
|
|
|
|
}
|
|
|
|
|