f4ad36c4bf
these have not been heavily tested, but they should work as described in the old standards. probably broken for non-finite values...
19 lines
336 B
C
19 lines
336 B
C
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
|
|
char *ecvt(double x, int n, int *dp, int *sign)
|
|
{
|
|
static char buf[16];
|
|
char tmp[32];
|
|
int i, j;
|
|
|
|
if (n-1U > 15) n = 15;
|
|
sprintf(tmp, "%.*e", n-1, x);
|
|
i = *sign = (tmp[0]=='-');
|
|
for (j=0; tmp[i]!='e'; j+=(tmp[i++]!='.'))
|
|
buf[j] = tmp[i];
|
|
buf[j] = 0;
|
|
*dp = atoi(tmp+i+1);
|
|
|
|
return buf;
|
|
}
|