Changeset 702 in Sophya for trunk/SophyaExt/FitsIOServer

Timestamp:

Jan 6, 2000, 4:48:10 PM (26 years ago)

Author:

ansari

Message:

Rationalisation mac. D. Y.

File:

• trunk/SophyaExt/FitsIOServer/fitsioserver.cc (modified) (3 diffs)

trunk/SophyaExt/FitsIOServer/fitsioserver.cc

@@ -169 +169 @@
       else if(bitpix ==  LONG_IMG)
         {
-          TMatrix<int> *mat=new TMatrix<int>(nrows,ncols);
+         // TMatrix<int> *mat=new TMatrix<int>(nrows,ncols);
+          TMatrix<long> *mat=new TMatrix<long>(nrows,ncols);
           load(*mat,flnm);
           if(naxis == 1)
             {
-              TVector<int> *vect=new TVector<int>(*mat);
+              TVector<long> *vect=new TVector<long>(*mat);
+         //     TVector<int> *vect=new TVector<int>(*mat);              // Rationalisation mac D.Y.
               delete mat;
               return vect;
@@ -435 +437 @@
               int ival;
               fits_read_key(fptr,TINT,keyname,&ival,NULL,&status);
-              nt0.Info()[keyname]= ival;
+              nt0.Info()[keyname]= (long) ival;         // Portage mac DY
               break;
             case 'L':
@@ -441 +443 @@
               if(strncmp(strval,"T",1) == 0) ilog= 1;
               else ilog= 0;
-              nt0.Info()[keyname]= ilog;
+              nt0.Info()[keyname]= (long) ilog;
               break;
             case 'F':