Changeset 915

Timestamp:

08/12/13 16:01:45 (11 years ago)

Author:

sdipsl

Message:

call IGCM_debug_PrintInfosActions only for instrumented functions

File:

• trunk/libIGCM/libIGCM_debug/libIGCM_debug.ksh (modified) (6 diffs)

trunk/libIGCM/libIGCM_debug/libIGCM_debug.ksh

@@ -51 +51 @@
 # libIGCM_CurrentTag
 # Current libIGCM tag, check compatibilty with *.card
-typeset -r libIGCM_CurrentTag="2.0"
+typeset -r libIGCM_CurrentTag="1.0"
 
 #==================================================
@@ -226 +226 @@
   if ( $DEBUG_debug ) ; then
     typeset decal command arguments startTime_ms endTime_ms
-    typeset fileList source dest
+    typeset instrumentation fileList source dest
 
     # INTRODUCE SIMPLE ERROR GENERATOR TO TEST SUPERVISOR
@@ -272 +272 @@
     #  4. How long it took
 
+    instrumentation=false
+
     case ${command} in
     # Copy from archive machine or from buffer
     IGCM_sys_Get|IGCM_sys_GetBuffer)
+      instrumentation=true
       if [ ${#arguments[*]} -eq 2 ] ; then
         source=${arguments[0]}
@@ -302 +305 @@
     # Copy from compute node
     IGCM_sys_Get_Master|IGCM_sys_Get_Dir)
+      instrumentation=true
       if [ ${#arguments[*]} -eq 2 ] ; then
         source=${arguments[0]}
@@ -312 +316 @@
     # Rebuild command
     IGCM_sys_rebuild|IGCM_sys_rebuild_station)
+      instrumentation=true
       # All but the first
       fileList=${arguments[*]:1:${#arguments[*]}-1}
@@ -324 +329 @@
 
     # Print information related to instrumentation
-    IGCM_debug_PrintInfosActions ${command} ${entitySize} ${startTime_ms} ${endTime_ms} ${dest} ${source}
+    ( ${instrumentation} ) && IGCM_debug_PrintInfosActions ${command} ${entitySize} ${startTime_ms} ${endTime_ms} ${dest} ${source}
 
     # Only cosmetics : stack file