/* ECP: FILEname=fig8_22.c */
/* 1*/   char *
/* 2*/   Strcpy( char * const Lhs, const char *Rhs )
/* 3*/   {
/* 4*/       char *Lhp = Lhs;

/* 5*/       if( Lhs != Rhs )
/* 6*/           while( ( *Lhp++ = *Rhs++ ) != '\0' )
/* 7*/               ;

/* 8*/       return Lhs;
/* 9*/   }