31 lines
794 B
C
31 lines
794 B
C
/* Copyright (c) 1990, 1991 UNIX System Laboratories, Inc. */
|
|
/* Copyright (c) 1988 AT&T */
|
|
/* All Rights Reserved */
|
|
|
|
/* THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF */
|
|
/* UNIX System Laboratories, Inc. */
|
|
/* The copyright notice above does not evidence any */
|
|
/* actual or intended publication of such source code. */
|
|
|
|
#ident "@(#)sccs:lib/mpwlib/trnslat.c 6.2"
|
|
/*
|
|
Copy `str' to `result' replacing any character found
|
|
in both `str' and `old' with the corresponding character from `new'.
|
|
Return `result'.
|
|
*/
|
|
|
|
char *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);
|
|
}
|