nsz Git - libfirm/blob - ir/be/test/fehler042.c

   1 /* float problems */
   2 #include <stdio.h>
   3
   4 double Radix = 2.0;
   5 double One   = 1.0;
   6 double Zero  = 0.0;
   7 double U1;
   8 double W;
   9 double Y;
  10 double Precision;
  11
  12 int main() {
  13         W = One;
  14         Precision = Zero;
  15         do {
  16                 Precision = Precision + One;
  17                 W = W * Radix;
  18                 Y = W + One;
  19         } while((Y - W) == One);
  20
  21         U1 = One / W;
  22         printf("BLa. %.30e\n", U1);
  23
  24
  25         return 0;
  26 }