Re: [perl #27690] Numeric comparison bug

2004-03-17 Thread S. Livingston
Oops, use this one instead... "re"-fixes the exponent support... *** tmp/parrot/src/string.c Sat Mar 6 03:00:06 2004 --- parrot/src/string.c Wed Mar 17 16:05:50 2004 *** *** 1836,1844 int exp_sign = 0; INTVAL in_exp = 0; INTVAL in_number = 0; !

Re: [perl #27690] Numeric comparison bug

2004-03-17 Thread S. Livingston
Its the old problem of rounding errors in floating point arithmetic. In string_to_num() in src/string.c, f = f * sign * pow(10.0, exponent); /* ugly, oh yeah */ Which in this case translates to 12.0*-1*0.1 which is -1.2000...2 != -1.2. I replaced this bit of code from a block I found i

Re: [CVS ci] PLATFORMS

2004-02-27 Thread S. Livingston
I compiled on Tru64 > uname -m -p -r -s -v OSF1 V4.0 878 alpha I compiled with the digital compiler, not gcc, DEC C V5.6-075 on Digital UNIX V4.0 (Rev. 878) I ran into the inet_pton problem described earlier. This installation also does not have snprintf() so I had to add an #ifdef HAS_