static char Sccsid[] "@(#)trnslat 1.1";
/*
Copy `str' to `result' replacing any character found
in both `str' and `old' with the corresponding character from `new'.
Return `result'.
*/
trnslat(str,old,new,result)
register char *str;
char *old, *new, *result;
{
register char *r, *o;
for (r = result; *r = *str++; r++)
for (o = old; *o; )
if (*r == *o++) {
*r = new[o - old -1];
break;
}
return(result);
}