Changeset 20839 for branches/eam_branch_20081124/Ohana/src/opihi/cmd.data/mget.c

Timestamp:

Nov 25, 2008, 4:51:39 PM (18 years ago)

Author:

eugene

Message:

convert opihi vectors to double type, add option for int type as well

File:

• branches/eam_branch_20081124/Ohana/src/opihi/cmd.data/mget.c (modified) (4 diffs)

branches/eam_branch_20081124/Ohana/src/opihi/cmd.data/mget.c

@@ -4 +4 @@
   
   int i, Nx, Ny, Npix, xdir, Nset;
-  float *in, *out;
+  float *in;
+  opihi_flt *out;
   Buffer *buf;
   Vector *vec;
@@ -33 +34 @@
   if (xdir) {
     vec[0].Nelements = Npix = Nx;
-    REALLOCATE (vec[0].elements, float, Npix);
+    REALLOCATE (vec[0].elements.Flt, opihi_flt, Npix);
     if (Nset >= Ny) {
       gprint (GP_ERR, "row out of range\n");
@@ -39 +40 @@
     }
     in  = (float *) buf[0].matrix.buffer + Nx*Nset;
-    out = vec[0].elements;
+    out = vec[0].elements.Flt;
     for (i = 0; i < Npix; i++, in++, out++) {
       *out = *in;
     }
-    return (TRUE);
   } else {
     vec[0].Nelements = Npix = Ny;
-    REALLOCATE (vec[0].elements, float, Npix);
+    REALLOCATE (vec[0].elements.Flt, opihi_flt, Npix);
     if (Nset >= Nx) {
       gprint (GP_ERR, "column out of range\n");
@@ -52 +52 @@
     }
     in  = (float *) buf[0].matrix.buffer + Nset;
-    out = vec[0].elements;
+    out = vec[0].elements.Flt;
     for (i = 0; i < Npix; i++, in+=Nx, out++) {
       *out = *in;
     }
-    return (TRUE);
-  }    
+  }
+  return (TRUE);
 }
-