Changeset 6218

Timestamp:

10/09/10 17:58:45 (14 years ago)

Author:

Eric.Larour

Message:

Added gprof flag, to profile executables

Location:

issm/trunk/src/m

Files:

• classes/@model/model.m (modified) (1 diff)
• classes/clusters/astrid.m (modified) (2 diffs)
• model/solveparallel.m (modified) (1 diff)

issm/trunk/src/m/classes/@model/model.m

@@ -232 +232 @@
         md.element_debugid=NaN;
         md.mem_debug=0;
+        md.gprof=0;
         md.memoryleaks=NaN;
 

issm/trunk/src/m/classes/clusters/astrid.m

@@ -58 +58 @@
                  end
                  %}}}
-                 function BuildQueueScript(cluster,modelname,analysis_type,mem_debug) % {{{1
+                 function BuildQueueScript(cluster,md) %{{{1
+                 
+                         %retrieve parameters
+                         modelname=md.name;
+                         analysis_type=md.analysis_type;
+                         mem_debug=md.mem_debug;
 
                          %open file for writing: 
@@ -70 +75 @@
                                  %fprintf(fid,'LD_PRELOAD=%s mpirun -np %i %s --leak-check=full --gen-suppressions=all --suppressions=%s %s/issm.exe %s %s %s.bin %s.petsc %s.outbin %s.lock  2> %s.errlog >%s.outlog & ',cluster.valgrindlib,cluster.np,cluster.valgrind,cluster.valgrindsup,cluster.codepath,EnumToString(analysis_type),cluster.executionpath,modelname,modelname,modelname,modelname,modelname,modelname);
                                  fprintf(fid,'LD_PRELOAD=%s mpirun -np %i %s --leak-check=full --suppressions=%s %s/issm.exe %s %s %s.bin %s.petsc %s.outbin %s.lock  2> %s.errlog >%s.outlog & ',cluster.valgrindlib,cluster.np,cluster.valgrind,cluster.valgrindsup, cluster.codepath,EnumToString(analysis_type),cluster.executionpath,modelname,modelname,modelname,modelname,modelname,modelname);
+                         end
+
+                         if md.gprof,
+                                 fprintf(fid,'\n gprof %s/issm.exe gmon.out > %s.performance',cluster.codepath,modelname);
                          end
 

issm/trunk/src/m/model/solveparallel.m

@@ -21 +21 @@
 
 %Now, we need to build the queuing script, used by the cluster to launch the job.
-cluster.BuildQueueScript(md.name,md.analysis_type,md.mem_debug);
+cluster.BuildQueueScript(md);
 
 %Now, launch the queueing script