Changeset 1437 in Sophya for trunk/ArchTOIPipe/Kernel/fitstoiwtr.cc

Timestamp:

Mar 12, 2001, 7:00:28 PM (25 years ago)

Author:

ansari

Message:

Protections diverses dans TOIProcessor et FITSTOIReader/Writer
Ajout d'un TOI (TOISeqBuffered) avec gestion d'un buffer entre put/get
Ajout de processeurs de test (RZTOIProc...) , programme test associe
et SMakefile (pour compil avec SOPHYA)

Reza 12/3/2001

File:

• trunk/ArchTOIPipe/Kernel/fitstoiwtr.cc (modified) (1 diff)

trunk/ArchTOIPipe/Kernel/fitstoiwtr.cc

@@ -92 +92 @@
       fits_unlock();
       for (int i=0; i<ndata; i++) {
-        double x = getData(i, sn);
+        double x = -9.e19;  // $CHECK$ - Reza valeur par defaut !
+        if (checkInputTOIIndex(i)) x = getData(i, sn);
         fits_lock();
         if (outFlags) {
           fits_write_col_dbl(fptr, 2*i+2, fitsLine, 1, 1, &x, &fstatus);
-          x = getFlag(i, sn);
+          if (checkInputTOIIndex(i))   x = getFlag(i, sn);
+          else x = -9.e19;  // $CHECK$ - Reza valeur par defaut !
           fits_write_col_dbl(fptr, 2*i+3, fitsLine, 1, 1, &x, &fstatus);
         } else {