Changeset 3495 for trunk/psLib/src/dataIO/psFits.c

Timestamp:

Mar 24, 2005, 12:21:17 PM (21 years ago)

Author:

desonia

Message:

changes for test of psFitsUpdateTable.

File:

• trunk/psLib/src/dataIO/psFits.c (modified) (5 diffs)

trunk/psLib/src/dataIO/psFits.c

@@ -7 +7 @@
  *  @author Robert DeSonia, MHPCC
  *
- *  @version $Revision: 1.22 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2005-03-22 21:52:49 $
+ *  @version $Revision: 1.23 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2005-03-24 22:21:17 $
  *
  *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
@@ -1668 +1668 @@
     }
 
-
     // check to see if we even are positioned on a table HDU
     int hdutype;
@@ -1684 +1683 @@
         return false;
     }
-
 
     psMetadataIterator* iter = psMetadataIteratorAlloc(data,PS_LIST_HEAD,NULL);
@@ -1700 +1698 @@
                 convertPsTypeToFits(item->type, NULL, NULL, &dataType);
 
-                if (fits_write_col(fits->p_fd, dataType, colnum, row, 0,1,&item->data,&status) != 0) {
+                if (fits_write_col(fits->p_fd, dataType, colnum, row+1, 1, 1, &item->data,&status) != 0) {
                     char fitsErr[MAX_STRING_LENGTH];
                     (void)fits_get_errstatus(status, fitsErr);
@@ -1706 +1704 @@
                             PS_ERRORTEXT_psFits_WRITE_FAILED,
                             fits->filename, fitsErr);
+                    psFree(iter);
                     return false;
                 }
+            } else {
+                // the column was not found.
+                psWarning("No column with the name '%s' exists in the table.",
+                          item->name);
             }
         }