strichr.c

mips架构的bootloader,99左右的版本 但源代码现在没人更新了

/*************************************************************
 * File: lib/strichr.c
 * Purpose: Part of C runtime library
 * Author: Phil Bunce ([e-mail])
 * Revision History:
 *	970304	Start of revision history
 */

#include "string.h"

/*************************************************************
*  char *strichr(p,c) 
*	inserts c as the first char of the string p 
*/
char *strichr(p,c)
char *p;
int c;
{
char *t;

if (!p) return(p);
for (t=p;*t;t++) ;
for (;t >= p;t--) *(t+1) = *t;
*p = c;
return(p);
}