Changeset 651 for trunk/libIGCM/libIGCM_sys/libIGCM_sys_mercurex8.ksh

Timestamp:

04/14/12 19:52:40 (12 years ago)

Author:

aclsce

Message:

Added check to be sure there is enough space on temporary filesystems (only on vargas, titane and mercure sx9).
If there is not enough space, we stop.

File:

• trunk/libIGCM/libIGCM_sys/libIGCM_sys_mercurex8.ksh (modified) (1 diff)

trunk/libIGCM/libIGCM_sys/libIGCM_sys_mercurex8.ksh

@@ -1487 +1487 @@
   IGCM_debug_PopStack "IGCM_sys_build_run_file"
 }
+
+############################################################
+# Check of space available on temporary filesytems
+function IGCM_sys_check_quota {
+    IGCM_debug_PushStack "IGCM_sys_check_quota"
+    if ( $DEBUG_sys ) ; then
+        echo "IGCM_sys_check_quota"
+    fi
+    IGCM_debug_PopStack "IGCM_sys_check_quota"
+}