Changeset 936 for trunk/libIGCM/libIGCM_debug

Timestamp:

08/22/13 12:39:05 (11 years ago)

Author:

sdipsl

Message:

bugfix again with instrumentation. Should be fine now...
syntax error in libIGCM_sys

File:

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

trunk/libIGCM/libIGCM_debug/libIGCM_debug.ksh

@@ -42 +42 @@
     typeset StackFileLocation=${POST_DIR:=${PWD}}
     typeset StackFileName=checking.stack.$$
-  fi
+  else
+    typeset StackFileLocation=${POST_DIR:=${PWD}}
+    typeset StackFileName=checking.stack.$$
+  fi
+
   if [ -f ${StackFileLocation}/${StackFileName} ] ;
   then
@@ -334 +338 @@
         entitySize=$( IGCM_debug_sizeOfTabContent source ${dest} )
       elif ( [ ${#arguments[*]} -eq 3 ] && [ ${arguments[0]} = '/l' ] ) ; then
+        # IGCM_sys_Get /l liste_file[*] /ccc/scratch/cont003/dsm/p86denv/RUN_DIR/985998_14754/
         # Keep the array name hosting the all list
-        eval fileList=\${${arguments[1]}[*]}
+        eval set +A fileList \${${arguments[1]}}
         # just need the first file to get the directory
-        eval source=\${${arguments[1]}[0]}
+        source=${fileList[0]}
         dest=${arguments[2]}
         # Size of file whose name are stored in a list
-        entitySize=$( IGCM_debug_sizeOfTabContent fileList ${dest} )
+        entitySize=$( IGCM_debug_sizeOfTabContent fileList[*] ${dest} )
       elif [ [ ${#arguments[*]} -ge 3 ] ; then
        # All but the latest