Mercurial > hg > octave-lyh

diff src/ov-complex.cc @ 4815:2eb844b27953

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-03-04 00:14:44 by jwe]
author jwe
date Thu, 04 Mar 2004 00:14:44 +0000
parents e95c86d48732
children 81f78a2ff8a6
line wrap: on
line diff
--- a/src/ov-complex.cc
+++ b/src/ov-complex.cc
@@ -244,7 +244,7 @@
   hid_t space_hid = -1, type_hid = -1, data_hid = -1;
   bool retval = true;
 
-  space_hid = H5Screate_simple (0, dimens, (hsize_t*) 0);
+  space_hid = H5Screate_simple (0, dimens, 0);
   if (space_hid < 0) return false;
 
   type_hid = hdf5_make_complex_type (H5T_NATIVE_DOUBLE);
@@ -264,7 +264,7 @@
 
   Complex tmp = complex_value ();
   retval = H5Dwrite (data_hid, type_hid, H5S_ALL, H5S_ALL, H5P_DEFAULT, 
-		     (void*) X_CAST (double*, &tmp)) >= 0;
+		     &tmp) >= 0;
 
   H5Dclose (data_hid);
   H5Tclose (type_hid);
@@ -303,7 +303,7 @@
   // complex scalar:
   Complex ctmp;
   if (H5Dread (data_hid, complex_type, H5S_ALL, H5S_ALL, H5P_DEFAULT,
-	       (void *) X_CAST (double *, &ctmp)) >= 0)
+	       &ctmp) >= 0)
     {
       retval = true;
       scalar = ctmp;