tc_strchr.c

T-kernel 的extension源代码

/*
 *----------------------------------------------------------------------
 *    T-Kernel / Standard Extension
 *
 *    Copyright (C) 2006 by Ken Sakamura. All rights reserved.
 *    T-Kernel / Standard Extension is distributed 
 *      under the T-License for T-Kernel / Standard Extension.
 *----------------------------------------------------------------------
 *
 *    Version:   1.00.00
 *    Released by T-Engine Forum(http://www.t-engine.org) at 2006/8/11.
 *
 *----------------------------------------------------------------------
 */

/*
 *	tc_strchr.c (libtcstr)
 *
 *	TC character string library
 */

#include <basic.h>
#include <tstring.h>

EXPORT TC* tc_strchr( const TC *str, int ch )
{
	do {
		if ( *str == ch ) {
			return (TC*)str;
		}
	} while ( *(str++) != TNULL );
	return NULL;
}