}
-/*
- * check for the presence of a character within a string (returns count)
- */
-int haschar(char *st, int ch)
-{
- int a,b;
- b=0;
- for (a=0; a<strlen(st); ++a) if (st[a]==ch) ++b;
- return(b);
- }
-
void back(int spaces) /* Destructive backspace */
{