Changeset 1467 in Sophya for trunk/ArchTOIPipe/Kernel

Timestamp:

Apr 12, 2001, 3:14:22 PM (24 years ago)

Author:

ansari

Message:

Debug de SimpleDeglitcher, ajout de SimpleFanOut , Reza 12/4/2001

File:

• trunk/ArchTOIPipe/Kernel/fitstoiwtr.cc (modified) (3 diffs)

trunk/ArchTOIPipe/Kernel/fitstoiwtr.cc

@@ -79 +79 @@
       cout << " Column[" << j+1 << "] -Flag- Name=" << coln[ck] << endl;
       ck++;
-      coltypes[j+2] = "1J";
+      coltypes[j+2] = "1I";
       colunits[j+2] = "Int_8Flag";
     }
@@ -102 +102 @@
 
   double* tabdata = new double[ndata];
-  long* tabflag = new long[ndata]; // ? pas int_8 ?? $CHECK$ - Reza
+  int* tabflag = new int[ndata]; // ? pas int_8 ?? $CHECK$ - Reza
   bool* tabck = new bool[ndata];
   int i;
@@ -133 +133 @@
         if (outFlags) {
           fits_write_col_dbl(fptr, 2*i+2, fitsLine, 1, 1, tabdata+i, &fstatus);
-          fits_write_col_lng(fptr, 2*i+3, fitsLine, 1, 1, tabflag+i, &fstatus);
+          fits_write_col_int(fptr, 2*i+3, fitsLine, 1, 1, tabflag+i, &fstatus);
         } else {
           fits_write_col_dbl(fptr, i+2, fitsLine, 1, 1, tabdata+i, &fstatus);