Changeset 2360 in Sophya for trunk/ArchTOIPipe/Kernel/fitsringrdr.cc

Timestamp:

Apr 4, 2003, 4:17:37 PM (22 years ago)

Author:

cecile

Message:

OK

File:

• trunk/ArchTOIPipe/Kernel/fitsringrdr.cc (modified) (5 diffs)

trunk/ArchTOIPipe/Kernel/fitsringrdr.cc

@@ -2 +2 @@
 //                               Christophe Magneville
 //                               Reza Ansari
-// $Id: fitsringrdr.cc,v 1.3 2003-04-01 13:27:48 aubourg Exp $
+// $Id: fitsringrdr.cc,v 1.4 2003-04-04 14:17:03 cecile Exp $
 
 #include "fitsringrdr.h"
@@ -29 +29 @@
   Buff_Sz = (buffsz>0) ? buffsz: 1024;
   return;
+}
+
+void FITSRingReader::setNRings(long n) {
+  nRings = n;
 }
 
@@ -131 +135 @@
     sprintf(xname, "CRing_%d", ring);
 
-
     fits_lock();
     fits_movabs_hdu(fptr, ring+2, NULL, &fstatus);
@@ -141 +144 @@
     fits_read_key(fptr, TLONG, "NSAMPLES", &nSamples, commt, &fstatus);
     fits_unlock();
-
+    wontNeedBefore(ring*nSamples);
+    cout << "!!!!!!! RING " << ring << endl;
+    
     for (int i=0; i<nSamples; i++) {
       double data;
@@ -154 +159 @@
   
   fits_lock();
-  if (fptr) {
-    fits_close_file(fptr,&fstatus);
-    fptr = NULL;
-  }
+  fits_report_error(stderr, fstatus);
+  fits_close_file(fptr,&fstatus);
   fits_unlock();
 }