s_bfill(a,b,c)
int b,c;
 char *a;
{
int i;
      for (i=0; i<b; i++) *a++=c;
}
s_fill(b,a,c)
int b,c;
char *a;
{
int i;
   for (i=0; i<b; i++) *a++=c;
}