Diff for /gforth/prim between versions 1.241 and 1.242

version 1.241, 2009/04/20 19:14:46 version 1.242, 2009/05/12 16:54:58
Line 2150  int flag; Line 2150  int flag;
 int decpt;  int decpt;
 sig=ecvt(r, u, &decpt, &flag);  sig=ecvt(r, u, &decpt, &flag);
 n=(r==0. ? 1 : decpt);  n=(r==0. ? 1 : decpt);
 // workaround Mac OS X bug in ecvt  flag=signbit(r); /* not all ecvt()s do this as desired */
 flag=signbit(r);  
 f1=FLAG(flag!=0);  f1=FLAG(flag!=0);
 f2=FLAG(isdigit((unsigned)(sig[0]))!=0);  f2=FLAG(isdigit((unsigned)(sig[0]))!=0);
 siglen=strlen((char *)sig);  siglen=strlen((char *)sig);

Removed from v.1.241  
changed lines
  Added in v.1.242


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>