![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to ecvt.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth / engine|
Return to ecvt.c CVS log | Up to [gforth] / gforth / engine |
| version 1.3, 1998/12/08 22:03:02 | version 1.4, 1999/03/28 16:10:03 |
|---|---|
| Line 32 char* ecvt(double x, int len, int* exp, | Line 32 char* ecvt(double x, int len, int* exp, |
| { | { |
| int i, j; | int i, j; |
| double z; | double z; |
| fprintf(stderr, "using own ecvt\n"); | |
| if(len > (MAXCONV-1)) len = MAXCONV-1; | if(len > (MAXCONV-1)) len = MAXCONV-1; |