Index: trunk/psLib/src/fits/psFitsTable.c
===================================================================
--- trunk/psLib/src/fits/psFitsTable.c	(revision 6354)
+++ trunk/psLib/src/fits/psFitsTable.c	(revision 6445)
@@ -7,6 +7,6 @@
  *  @author Robert DeSonia, MHPCC
  *
- *  @version $Revision: 1.4 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2006-02-08 01:03:34 $
+ *  @version $Revision: 1.5 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2006-02-17 03:24:46 $
  *
  *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
@@ -595,4 +595,5 @@
         psTrace(".psFits.psFitsReadTable",5,"Reading row %i of %i\n",row, numRows);
         table->data[row] = psFitsReadTableRow(fits,row);
+        table->n++;
     }
 
@@ -658,4 +659,5 @@
                         psMemDecrRefCounter(fItem);
                         columns->data[n] = psMemIncrRefCounter(item);
+                        columns->n++;
 
                     } else if (item->type == PS_DATA_VECTOR &&
@@ -663,4 +665,5 @@
                         psMemDecrRefCounter(fItem);
                         columns->data[n] = psMemIncrRefCounter(item);
+                        columns->n++;
                     }
                 } else {
@@ -686,8 +689,11 @@
 
     //create list of column names and types.
+    columns->n--;
     psArray* columnNames = psArrayAlloc(columns->n);
     psArray* columnTypes = psArrayAlloc(columns->n);
     for (int n=0; n < columns->n; n++) {
         columnNames->data[n] = psMemIncrRefCounter(((psMetadataItem*)columns->data[n])->name);
+        columnNames->n++;
+        columnTypes->n++;
         if ( ! getMetadataTForm((psMetadataItem*)columns->data[n],
                                 (char**)&(columnTypes->data[n]),1) ) {
@@ -754,4 +760,5 @@
                                                    table->data[row],
                                                    item->name));
+                colArray->n++;
             }
             fits_write_col_str(fits->fd,
