diff liboctave/data-conv.cc @ 10349:d4d13389c957

make load-save to matlab format work when using --enable-64
author John W. Eaton <jwe@octave.org>
date Mon, 22 Feb 2010 23:07:21 -0500
parents 07ebe522dac2
children fd0a3ac60b0e
line wrap: on
line diff
--- a/liboctave/data-conv.cc
+++ b/liboctave/data-conv.cc
@@ -134,13 +134,13 @@
 static std::string
 strip_spaces (const std::string& str)
 {
-  int n = str.length ();
+  size_t n = str.length ();
 
-  int k = 0;
+  size_t k = 0;
 
   std::string s (n, ' ');
 
-  for (int i = 0; i < n; i++)
+  for (size_t i = 0; i < n; i++)
     if (! isspace (str[i]))
       s[k++] = tolower (str[i]);
 
@@ -490,7 +490,7 @@
           stream.read (reinterpret_cast<char *>  (ptr), size * len); \
           if (swap) \
             swap_bytes< size > (ptr, len); \
-          for (int i = 0; i < len; i++) \
+          for (octave_idx_type i = 0; i < len; i++) \
             data[i] = ptr[i]; \
         } \
     } \
@@ -507,7 +507,7 @@
           char tmp_type = type; \
           stream.write (&tmp_type, 1); \
           OCTAVE_LOCAL_BUFFER (TYPE, ptr, len); \
-          for (int i = 0; i < len; i++) \
+          for (octave_idx_type i = 0; i < len; i++) \
             ptr[i] = static_cast <TYPE> (data[i]);         \
           stream.write (reinterpret_cast<char *> (ptr), size * len); \
         } \
@@ -540,199 +540,199 @@
 // FIXME -- assumes sizeof (float) == 4
 
 static void
-IEEE_big_double_to_IEEE_little_double (void *d, int len)
+IEEE_big_double_to_IEEE_little_double (void *d, octave_idx_type len)
 {
   swap_bytes<8> (d, len);
 }
 
 static void
-VAX_D_double_to_IEEE_little_double (void * /* d */, int /* len */)
+VAX_D_double_to_IEEE_little_double (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("VAX D float", "IEEE little endian format");
 }
 
 static void
-VAX_G_double_to_IEEE_little_double (void * /* d */, int /* len */)
+VAX_G_double_to_IEEE_little_double (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("VAX G float", "IEEE little endian format");
 }
 
 static void
-Cray_to_IEEE_little_double (void * /* d */, int /* len */)
+Cray_to_IEEE_little_double (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("Cray", "IEEE little endian format");
 }
 
 static void
-IEEE_big_float_to_IEEE_little_float (void *d, int len)
+IEEE_big_float_to_IEEE_little_float (void *d, octave_idx_type len)
 {
   swap_bytes<4> (d, len);
 }
 
 static void
-VAX_D_float_to_IEEE_little_float (void * /* d */, int /* len */)
+VAX_D_float_to_IEEE_little_float (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("VAX D float", "IEEE little endian format");
 }
 
 static void
-VAX_G_float_to_IEEE_little_float (void * /* d */, int /* len */)
+VAX_G_float_to_IEEE_little_float (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("VAX G float", "IEEE little endian format");
 }
 
 static void
-Cray_to_IEEE_little_float (void * /* d */, int /* len */)
+Cray_to_IEEE_little_float (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("Cray", "IEEE little endian format");
 }
 
 static void
-IEEE_little_double_to_IEEE_big_double (void *d, int len)
+IEEE_little_double_to_IEEE_big_double (void *d, octave_idx_type len)
 {
   swap_bytes<8> (d, len);
 }
 
 static void
-VAX_D_double_to_IEEE_big_double (void * /* d */, int /* len */)
+VAX_D_double_to_IEEE_big_double (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("VAX D float", "IEEE big endian format");
 }
 
 static void
-VAX_G_double_to_IEEE_big_double (void * /* d */, int /* len */)
+VAX_G_double_to_IEEE_big_double (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("VAX G float", "IEEE big endian format");
 }
 
 static void
-Cray_to_IEEE_big_double (void * /* d */, int /* len */)
+Cray_to_IEEE_big_double (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("Cray", "IEEE big endian format");
 }
 
 static void
-IEEE_little_float_to_IEEE_big_float (void *d, int len)
+IEEE_little_float_to_IEEE_big_float (void *d, octave_idx_type len)
 {
   swap_bytes<4> (d, len);
 }
 
 static void
-VAX_D_float_to_IEEE_big_float (void * /* d */, int /* len */)
+VAX_D_float_to_IEEE_big_float (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("VAX D float", "IEEE big endian format");
 }
 
 static void
-VAX_G_float_to_IEEE_big_float (void * /* d */, int /* len */)
+VAX_G_float_to_IEEE_big_float (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("VAX G float", "IEEE big endian format");
 }
 
 static void
-Cray_to_IEEE_big_float (void * /* d */, int /* len */)
+Cray_to_IEEE_big_float (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("Cray", "IEEE big endian format");
 }
 
 static void
-IEEE_little_double_to_VAX_D_double (void * /* d */, int /* len */)
+IEEE_little_double_to_VAX_D_double (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("IEEE little endian", "VAX D");
 }
 
 static void
-IEEE_big_double_to_VAX_D_double (void * /* d */, int /* len */)
+IEEE_big_double_to_VAX_D_double (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("IEEE big endian", "VAX D");
 }
 
 static void
-VAX_G_double_to_VAX_D_double (void * /* d */, int /* len */)
+VAX_G_double_to_VAX_D_double (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("VAX G float", "VAX D");
 }
 
 static void
-Cray_to_VAX_D_double (void * /* d */, int /* len */)
+Cray_to_VAX_D_double (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("Cray", "VAX D");
 }
 
 static void
-IEEE_little_float_to_VAX_D_float (void * /* d */, int /* len */)
+IEEE_little_float_to_VAX_D_float (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("IEEE little endian", "VAX D");
 }
 
 static void
-IEEE_big_float_to_VAX_D_float (void * /* d */, int /* len */)
+IEEE_big_float_to_VAX_D_float (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("IEEE big endian", "VAX D");
 }
 
 static void
-VAX_G_float_to_VAX_D_float (void * /* d */, int /* len */)
+VAX_G_float_to_VAX_D_float (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("VAX G float", "VAX D");
 }
 
 static void
-Cray_to_VAX_D_float (void * /* d */, int /* len */)
+Cray_to_VAX_D_float (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("Cray", "VAX D");
 }
 
 static void
-IEEE_little_double_to_VAX_G_double (void * /* d */, int /* len */)
+IEEE_little_double_to_VAX_G_double (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("IEEE little endian", "VAX G");
 }
 
 static void
-IEEE_big_double_to_VAX_G_double (void * /* d */, int /* len */)
+IEEE_big_double_to_VAX_G_double (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("IEEE big endian", "VAX G");
 }
 
 static void
-VAX_D_double_to_VAX_G_double (void * /* d */, int /* len */)
+VAX_D_double_to_VAX_G_double (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("VAX D float", "VAX G");
 }
 
 static void
-Cray_to_VAX_G_double (void * /* d */, int /* len */)
+Cray_to_VAX_G_double (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("VAX G float", "VAX G");
 }
 
 static void
-IEEE_little_float_to_VAX_G_float (void * /* d */, int /* len */)
+IEEE_little_float_to_VAX_G_float (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("IEEE little endian", "VAX G");
 }
 
 static void
-IEEE_big_float_to_VAX_G_float (void * /* d */, int /* len */)
+IEEE_big_float_to_VAX_G_float (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("IEEE big endian", "VAX G");
 }
 
 static void
-VAX_D_float_to_VAX_G_float (void * /* d */, int /* len */)
+VAX_D_float_to_VAX_G_float (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("VAX D float", "VAX G");
 }
 
 static void
-Cray_to_VAX_G_float (void * /* d */, int /* len */)
+Cray_to_VAX_G_float (void * /* d */, octave_idx_type /* len */)
 {
   gripe_data_conversion ("VAX G float", "VAX G");
 }
 
 void
-do_double_format_conversion (void *data, int len,
+do_double_format_conversion (void *data, octave_idx_type len,
                              oct_mach_info::float_format from_fmt,
                              oct_mach_info::float_format to_fmt)
 {
@@ -859,7 +859,7 @@
 }
 
 void
-do_float_format_conversion (void *data, int len,
+do_float_format_conversion (void *data, octave_idx_type len,
                             oct_mach_info::float_format from_fmt,
                             oct_mach_info::float_format to_fmt)
 {
@@ -986,7 +986,7 @@
 }
 
 void
-do_float_format_conversion (void *data, size_t sz, int len,
+do_float_format_conversion (void *data, size_t sz, octave_idx_type len,
                             oct_mach_info::float_format from_fmt,
                             oct_mach_info::float_format to_fmt)
 {
@@ -1010,8 +1010,9 @@
 
 
 void
-read_doubles (std::istream& is, double *data, save_type type, int len,
-              bool swap, oct_mach_info::float_format fmt)
+read_doubles (std::istream& is, double *data, save_type type,
+              octave_idx_type len, bool swap,
+              oct_mach_info::float_format fmt)
 {
   switch (type)
     {
@@ -1044,7 +1045,7 @@
         OCTAVE_LOCAL_BUFFER (float, ptr, len);
         is.read (reinterpret_cast<char *> (ptr), 4 * len);
         do_float_format_conversion (ptr, len, fmt);
-        for (int i = 0; i < len; i++)
+        for (octave_idx_type i = 0; i < len; i++)
           data[i] = ptr[i];
       }
       break;
@@ -1066,8 +1067,9 @@
 }
 
 void
-read_floats (std::istream& is, float *data, save_type type, int len,
-              bool swap, oct_mach_info::float_format fmt)
+read_floats (std::istream& is, float *data, save_type type,
+             octave_idx_type len, bool swap,
+             oct_mach_info::float_format fmt)
 {
   switch (type)
     {
@@ -1105,7 +1107,7 @@
         OCTAVE_LOCAL_BUFFER (double, ptr, len);
         is.read (reinterpret_cast<char *> (ptr), 8 * len);
         do_double_format_conversion (ptr, len, fmt);
-        for (int i = 0; i < len; i++)
+        for (octave_idx_type i = 0; i < len; i++)
           data[i] = ptr[i];
       }
       break;
@@ -1117,7 +1119,8 @@
 }
 
 void
-write_doubles (std::ostream& os, const double *data, save_type type, int len)
+write_doubles (std::ostream& os, const double *data, save_type type,
+               octave_idx_type len)
 {
   switch (type)
     {
@@ -1165,7 +1168,8 @@
 }
 
 void
-write_floats (std::ostream& os, const float *data, save_type type, int len)
+write_floats (std::ostream& os, const float *data, save_type type,
+              octave_idx_type len)
 {
   switch (type)
     {