Changeset 20839 for branches/eam_branch_20081124/Ohana/src/opihi/cmd.data/subset.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/subset.c (modified) (1 diff)

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

@@ -28 +28 @@
   /* check size of ivec, tvec: must match */
 
-  REALLOCATE (ovec[0].elements, float, MAX (tvec[0].Nelements, 1));
+  REALLOCATE (ovec[0].elements.Flt, opihi_flt, MAX (tvec[0].Nelements, 1));
   for (j = i = 0; i < tvec[0].Nelements; i++) {
-    if (tvec[0].elements[i]) {
-      ovec[0].elements[j] = ivec[0].elements[i];
+    if (tvec[0].elements.Flt[i]) {
+      ovec[0].elements.Flt[j] = ivec[0].elements.Flt[i];
       j++;
     }
   }
   ovec[0].Nelements = j;
-  REALLOCATE (ovec[0].elements, float, MAX (ovec[0].Nelements, 1));
+  REALLOCATE (ovec[0].elements.Flt, opihi_flt, MAX (ovec[0].Nelements, 1));
 
   DeleteVector (tvec);