preblank(s)
char *s;
{
    int n = 0;

    while (s[n] == ' ' || s[n] == '\t')
    {
      ++n;
    }
    if (n > 0)
    {
      adjstring(s, n);
    }
    return;
}