Changeset 5164 for trunk/psLib/test/fits/tst_psFits.c

Timestamp:

Sep 27, 2005, 4:38:01 PM (21 years ago)

Author:

desonia

Message:

added support for writing psVectors to tables.

File:

• trunk/psLib/test/fits/tst_psFits.c (modified) (2 diffs)

trunk/psLib/test/fits/tst_psFits.c

@@ -6 +6 @@
 *  @author Robert DeSonia, MHPCC
 *
-*  @version $Revision: 1.9 $ $Name: not supported by cvs2svn $
-*  @date $Date: 2005-09-27 19:54:52 $
+*  @version $Revision: 1.10 $ $Name: not supported by cvs2svn $
+*  @date $Date: 2005-09-28 02:38:01 $
 *
 *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
@@ -201 +201 @@
                       str);
         psFree(str);
+
+        psVector* vec = psVectorAlloc(5,PS_TYPE_S32);
+        for (int x=0; x < 5; x++) {
+            vec->data.S32[x] = x*2;
+        }
+        psMetadataAdd(header,PS_LIST_TAIL, "MYVEC",
+                      PS_DATA_VECTOR,
+                      "psVector Item",
+                      vec);
+        psFree(vec);
 
         table->data[row] = header;