truncfp.c

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

/*************************************************************
 * File: lib/truncfp.c
 * Purpose: Used to truncate floating-point values
 * Author: Phil Bunce ([e-mail])
 * Revision History:
 *	980818	Moved here from vsprintf.c
 */

trunc_fp(fmt,p,n)
char fmt,*p;
int n;
{
int i;

if (*p == '-') p++;
p += 2 + n;
while (*p != 0 && *p != 'e' && *p != 'E') strdchr(p);
if (fmt == 'e') *p = 'e';
p += 2;
while (*p != 0 && *p == '0') strdchr(p);
if (strlen(p) == 0) strichr(p,'0');
if (strlen(p) == 1) strichr(p,'0');
}