Re: Fwd: perl@10517 (Fail)

[Ken Williams]

[EMAIL PROTECTED] (Nicholas Clark) wrote:
>Please could you send the output of this revised test program:
>
>#include "EXTERN.h"
>#include "perl.h"
>int main (void) {
>  double a = I32_MIN;
>  char buffer[256];
>  puts ("I32_MIN='"STRINGIFY(I32_MIN)"'");
>  sprintf (buffer, "I32_MIN=%g", a);
>  puts (buffer);
>  return 0;
>}
>
>[It's convoluted as printf is #defined as PerlIO, but puts and sprintf don't
>sem to be affected]
>
>I get
> ./testit 
>I32_MIN='(-2147483647-1)'
>I32_MIN=-2.14748e+09

Okay, I get

  % cc -o testprogram testprogram.c 
  testprogram.c: In function `main':
  testprogram.c:4: warning: decimal constant is so large that it is unsigned
  % ./testprogram
  I32_MIN='-2147483648'
  I32_MIN=2.14748e+09

so it looks like we're okay?


  -------------------                            -------------------
  Ken Williams                             Last Bastion of Euclidity
  [EMAIL PROTECTED]                            The Math Forum