[cig-commits] r4218 - mc/3D/CitcomS/trunk/lib

luis at geodynamics.org luis at geodynamics.org
Thu Aug 3 07:14:55 PDT 2006


Author: luis
Date: 2006-08-03 07:14:54 -0700 (Thu, 03 Aug 2006)
New Revision: 4218

Modified:
   mc/3D/CitcomS/trunk/lib/Output_h5.c
Log:
Changed h5output() so that it prints an error if the C macro USE_HDF5 is
not defined (and similarly for h5output_pseudo_surf())


Modified: mc/3D/CitcomS/trunk/lib/Output_h5.c
===================================================================
--- mc/3D/CitcomS/trunk/lib/Output_h5.c	2006-08-03 14:03:24 UTC (rev 4217)
+++ mc/3D/CitcomS/trunk/lib/Output_h5.c	2006-08-03 14:14:54 UTC (rev 4218)
@@ -137,9 +137,14 @@
 
 void h5output(struct All_variables *E, int cycles)
 {
-    void h5output_open(struct  All_variables *E);
-    
+#ifndef USE_HDF5
+    if(E->parallel.me == 0)
+        fprintf(stderr, "h5output(): CitcomS was compiled without HDF5!\n");
+    MPI_Finalize();
+    exit(8);
+#else
     printf("h5output()\n");
+
     if (cycles == 0) {
         h5output_open(E);
         h5output_coord(E);
@@ -174,11 +179,12 @@
     E->hdf5.step += 1;
 
     return;
+#endif
 }
 
 void h5output_pseudo_surf(struct All_variables *E, int cycles)
 {
-
+#ifdef USE_HDF5
     if (cycles == 0)
     {
         h5output_coord(E);
@@ -200,6 +206,7 @@
     /* h5output_ave_r(E, cycles); */
 
     return;
+#endif
 }
 
 



More information about the cig-commits mailing list