Revision 1877 trunk/src/linad99/fvar_io2.cpp

fvar_io2.cpp (revision 1877)
47 47
const int MAX_FIELD_LENGTH = 500;
48 48
const int MAX_NUMBER_COLUMNS = 6550;
49 49
const int MAX_NUMBER_ROWS = 6550;
50
#if !defined(HUGE)
51
#define HUGE 1.e+100
52
#endif
53 50

  
54 51
/**
55 52
 * Description not yet available.
......
189 186
           << err_ptr[3] << "\n";
190 187
       ad_exit(1);
191 188
     }
192
     #if defined(__SUN__) || defined (__GNUDOS__)
193
     double cmp = value(elem(i));
194
     if (cmp == HUGE || cmp == -HUGE)
195
     #else
196 189
     if (value(elem(i))== HUGE_VAL ||value(elem(i))== -HUGE_VAL)
197
     #endif
198 190
     {
199 191
       cerr << "Overflow Error decoding field " << filename
200 192
           << " in dmatrix::dmatrix(char * filename) " << "\n";

Also available in: Unified diff