version 1.1, 2006/01/25 15:18:49 |
version 1.2, 2008/03/21 23:13:48 |
Line 50 strtoIdd(CONST char *s, char **sp, doubl |
|
Line 50 strtoIdd(CONST char *s, char **sp, doubl |
|
int k, rv[2]; |
int k, rv[2]; |
|
|
B[0] = Balloc(2); |
B[0] = Balloc(2); |
|
if (B[0] == NULL) |
|
return STRTOG_NoMemory; |
B[0]->wds = 4; |
B[0]->wds = 4; |
k = strtoIg(s, sp, &fpi, exp, B, rv); |
k = strtoIg(s, sp, &fpi, exp, B, rv); |
|
if (k == STRTOG_NoMemory) |
|
return k; |
ULtodd((ULong*)f0, B[0]->x, exp[0], rv[0]); |
ULtodd((ULong*)f0, B[0]->x, exp[0], rv[0]); |
Bfree(B[0]); |
Bfree(B[0]); |
if (B[1]) { |
if (B[1]) { |