Changeset 949 in Sophya

Timestamp:

Apr 16, 2000, 6:48:45 PM (25 years ago)

Author:

ansari

Message:

Compil sous Sun-g++ (mpa-Garching) - Reza 16/4/2000

Location:

trunk

Files:

• SophyaExt/FitsIOServer/fitsfile.cc (modified) (1 diff)
• SophyaProg/PMixer/extractRS.cc (modified) (1 diff)
• SophyaProg/PMixer/tgrsr.cc (modified) (1 diff)
• SophyaProg/PMixer/tgsky.cc (modified) (3 diffs)

trunk/SophyaExt/FitsIOServer/fitsfile.cc

@@ +1 @@
+#include "machdefs.h"
+#include <stdlib.h>
 #include "fitsfile.h"
 #include "pexceptions.h"

trunk/SophyaProg/PMixer/extractRS.cc

@@ -114 +114 @@
         if (printlev > 2) 
           {
-            double min = 1000000000;
-            double max = -10000000000;
+            double min = 9.e99;
+            double max = -9.e99;
             for(int x=0;x<ings.NRows(); x++)
               {

trunk/SophyaProg/PMixer/tgrsr.cc

@@ -13 +13 @@
 int main(int narg, char* arg[]) 
 {
+#if !defined(SunOS) || !defined(__GNUG__)
+  // ca se plante sur Sun !
   SophyaInit();
+#endif
+
   InitTim();   // Initializing the CPU timer 
 

trunk/SophyaProg/PMixer/tgsky.cc

@@ -11 +11 @@
 int main(int narg, char* arg[]) 
 {
-  double teta,phi;
-  double gmoy=0., gsig=0.;
 
-  SophyaInit();
-  InitTim();   // Initializing the CPU timer 
   if ((narg < 5) || ((narg>1) && (strcmp(arg[1],"-h") == 0)) )  {
     cout << " tgsky : Generation of random skies  " << endl;
@@ -26 +22 @@
     }
 
+  try {
+  double teta,phi;
+  double gmoy=0., gsig=0.;
+#if !defined(SunOS) || !defined(__GNUG__)
+  // ca se plante sur Sun !
+  SophyaInit();
+#endif
+  InitTim();   // Initializing the CPU timer 
   int  ns = atoi(arg[1]);
   SphereHEALPix<float> sph(ns);
@@ -110 +114 @@
   PrtTim("End of WriteFITS ");
 
+  }
+  catch (PThrowable exc) {
+    cerr << " tgsky: Catched Exception - Msg= " << exc.Msg() << endl;
+  }
+  catch (...) {
+    cerr << " tgsky: Catched unknown exception (...) " << endl;
+  }
   cout <<  " ============ End of tgsky program ======== " << endl;
   return 0;