/* firstwd.c */

/* Recycle Object */



#include <ctype.h>



extern char *firstwd (char *to, char *from)

{

   while ( isspace(*from) && *from != '\0') ++from;

   while ( !isspace(*from) && *from != '\0') *to++ = *from++;

   *to = '\0';

   return(from);

}